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Maxi Bourse” 


Voici la version informatique du célèbre jeu de société qui, après 
l'Europe, a séduit les Etats-Unis et même la Chine ! 


Avec vos 15 milions de dollars, vivez la Bourse et devenez un financier international. 
Flèvre autour du tableau de cotations, loi de l'offre et 14 demande, vous faites varier 
les cours. Les chiffres fusent, les rumeurs circulent, s'amplifient ! Vous modifiez votre 
Stratégie et vos alliances. Les évènements internationaux éhangenl le cours du jeu... et 
rétournent les situations ! 


Affrontez jusqu'à 5 joueurs humains ou confrontez vous à 5 adversaires simulés par 
l'ordinateur (des experts internationaux ayant chacun sur personnalité), 

La version informatique donne au jeu de société une nouvelle dimension et lui apporte 
plus de nervosité en effectuant automatiquement calçuls el gestion des portefeuilles. 


Facile, accessible à tous, passionnant ! A coup de millions de doliars et avec humour, 
secouez la crise et devenez milliardaire avec MAXIBOURSE International, le jeu d'argent 
vraiment impitoyable ! 


Adapté par Bertrand Brocard, Jacky Adolphe et Jean-Michel Baudéquin d'après le jeu de société 
MAXIBOURSE International créé par Marc-Eric Gervais, Pascale Loiseau et Daniel Volpithac. 
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EXTRAITS DE CRITIQUES DES JOURNAUX SUR MAXI BOURSE 


«.… il semble que les auteurs aient réussi le rare tour de force de concilier réalisme et accessibilité... des 
règles simples, un matériel irréprochable pour une simulation aussi intéressante que distrayante... les frissons 
du vrai jeu...» (JEUX ET STATEGIE) 


«… avec MAXI BOURSE la fiction du jeu rejoint la réalité de la finance internationale...» (EST 
REPUBLICAIN) 


«MAXI BOURSE un très beau jeu. vous pouvez devenir le maître du monde.» (EVENEMENT DU 
JEUDI) 


«MAXI BOURSE - MAXI JEU... c’est simple comme bonjour et passionnant la haute finance avec 
MAXI BOURSE...» (AMSTRAD 100%) 
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La rentrée 88 sera studieuse ! 
Entendez par là que la majori- 
té des jeux prévus pour cet 
automne sont encore en 
cours de développement 
chez les éditeurs. Il faudra 
donc attendre un peu (le pro- 
chain TEO, par exemple) 
avant de les découvrir. 
C’est donc le moment où 
jamais pour se pencher sur 
les didacticiels carils sont 
en pleine mutation. La nou- 
velle génération intéresse 
aussi bien les étudiants que 
les professeurs et même les 
chercheurs. 
1989 approche à grands pas 
et vous n’entendrez bientôt 
plus parler que de bi-cente- 
naire. Alors avant l’over- 
dose de Révolution, décou- 
vrez en exclusivité ce qui se 
prépare sur ordinateur, c’est 
assez...révolutionnaire. 
Et enfin une grande nouvelle 
pour les Thomsonistes : l’au- 
tomne se passeraen famille. 
C'est en effet la grande 
réconciliation dans la famille 
Thomson : ils se parlent ! 
Pierre E. GRANGE 
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4| CHRONIQUES: un nou- 
veau format informatique: le 
VHS. MUSIQUE: com- 
mentrentrer au TOP 50 avec 


un TO8. DOSSIER: ordi- 





nateur et minitel, un complot de patriotes. 
INVENTEURS:  reprogrammez votre 
turbo. F(X)}-GRAPHE suite et fin. 
bal ro et MO: le rideau de fer est tombé. 
adresses utiles. 
PROGRAMMES: 
demandez le menu. 


k6 JURIDIQUE: le 





traitement comptable de l'informatique. 
TEO-SCOOP: la BD continue sa percée 
informatique. SOINTERVIEW: des didacticiels 
à la hauteur de leur mission. 5]. oGIcIELs: la 
PAO débarque sur Thomson. BASIC 
FONCTIONNEL: A 
nous les while ! 


EDUCATIFS: tour 





d'horizon de rentrée. 





CHRONIQUES 


DEMARQUEZ-VOUS ! 


Vous venez de créer 
votre propre marque. Vous 
êtes très content de vous 
car Vous Croyez avoir 
trouvé LE nom, l'unique, le 
seul, bien à vous et qui va 
si bien à votre marque. 

Et quelques jours plus 
tard, la déception : des 
dizaines d'autres portent 
le nom dont vous êtiez sl 
fier. 

Pour éviter cette décon- 





venue, une seule solution : 
taper le 36-29-36-30. C'est 
le serveur ICIMARQUES, 
la toute nouvelle base de 
données de l'Institut Natio- 
nal de la Propriété Indus- 
trielle. 

Ilcimarques, pour 9.06F ia 
minute, est le fil d'Ariane 
qui vous conduit à travers 
le dédale des 900 000 
marques, nationales et 
étrangères, qui y sont 


classées. Vous saurez tout 
de suite si votre marque 
est disponible. Pas facile 
de trouver un nom origi- 
nal ! D'ailleurs ilexiste 3 
marques déposées sous 
le nom de TEO, en plus 
de votre magazine préfé- 
ré. Avec lcimarques, vous 
connaîtrez aussi le 
déposant, le numéro, la 
date de dépôt [...] des 
marques répertoriées. 

Et comme l'INPI ne fait 
pas les choses à moitié, 
icimarques vous éclaire 
sur les chemins obscurs 
de la règlementation des 
marques (seulement les 
grandes lignes) pour tous 
les pays du monde ! 
Enfin, Icimarques vous 
donne les informations fraî- 
chement cueillies par 
PINPI. 

Alors si vous lancez un 
nouveau produit, n'hésitez 
pas, même si ce serveur 
est cher, il vous permet- 
tra de faire une réelle 
économie de temps, et 
comme le temps c'est de 
l'argent... M 


TOUT SAVOIR SUR LES 
CONTRIBUABLES 





Il sera désormais possible 
aux entreprises d'accéder 
à un nouveau fichier, celui 
de la Direction Générale 
des Impôts. Il livre les 
données concernant le 
revenu moyen imposé ou 
non, par foyer flscal. Il 
permet de cibler la 
richesse d’une population 
sur une commune. Au total 
36478 communes avec 
6000 informations par 
commune. Trés utile pour 
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les banques, assurances 
qui souhaitent implanter 
une nouvelle agence, mais 
aussi pour le département 
Marketing des grandes 
entreprises et les cabinets 
d'études. 


Le service est diffusé par 
Corel sous le nom de Geo- 
datel (qui comporte 
d'autres banques de 
données). Il en coûte 225 
Francs par mois. M 


SANS EQUIVOX 





Un minitel vocal sans écran 
ni clavier, mals si c'est pos- 
sible. 

Baptisé Equivox, I donne 
accès sur simple coup de 
fl à un serveur utilisant la 
technique du disque com- 
pact. On entend ainsi de 
vive voix les informations 
qui ont été chargées sur 
la messagerie (économie, 
arts et spectacles, etc..). 
Ce système de reconnais- 
sance vocale accepte tous 
les accents régionaux 
(provence, sud-ouest, 
Paris ou Alsace, et même 
les petites Anglaises en 
vacances pourront s’en 
servir). A noter : Equivox 
vient de recevoir récem- 
ment le prix de la 
fondation Jacques Douce 
qui récompense les 
découvertes les plus pro- 
metteuses. Ii faut croire 
qu'elle l'est et on voit déjà 
les applications, pour les 
aveugles ou les personnes 
non munies de minitel. I 


NAISSANCE D'UN GEANT 





Un nouveau géant (dans 
le monde de ia télémaiti- 
que) est né de la fusion 
entre Vicorp, leader dans 
le domaine des logiciels 
destinés à la réalisation 
de serveurs professionnels 
au grand public, et AZ 
Télématique, qui propose 
au grand public toute une 
gamme de services 
(messagerie, jeux, info...), 
crée des centres serveurs 
«clé en main». 

Le C.A. des deux sociétés 
réunies dépasse aujour- 
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d'hul les 150 milllons de 
francs et devrait atteindre 
500 millions de francs d'ici 


1990. 

Les deux soclétées 

devraient se compléter, 
chacune d'entre elles 
apportant son savoir faire 
à l’autre. M 


LE SUCCES 
PASSE PAR LA 


La production française 
de dessins animés peut 
rivaliser avec l'Extrême- 
Orient à une condition : 
informatiser les tâches 
répétitives et coûteuses 
en main d'oeuvre comme 
la mise en couleur, la 
saisle des images. 
Dans ce but Claude 
HUHARDEAUX crée 
LABEL 35 en octobre 
1985. Le logiciel mis au 
point permet de réutiliser 
prés de 40% des images 
(gérées par Une banque 
de données), contre 20% 
en production ciassique de 
dessins animés. 
il offre une bien meilleure 
qualité de l’image et des 
effets nouveaux de 
perspective. 
1987 : première com- 
mande pour les studios 
parisiens : la coproduction 
d’un dessin animé de vingt 
six épisodes de 13 
minutes : «Sharky et 
Georges». 
Une commande de 39 
autres épisodes devrait 
être passée. 
Du travail en perspective 
pour cette société de 7 
salariés qui collaborent 
quand même avec une 
quarantaine d'artistes 


(dessinateurs, scénaristes, 


animateurs). 

Hs sont crédibles, c’est sûr 
puisque récemment 
Finovelec, Innovacom et le 
fonds de placement à 
risque de ia banque 
Worms ont apporté 4 
millions de Francs de 
fonds à LABEL 35. = 


POUR PLUS DE SURETE 





Publ! News édite 
«l'annuaire de la sécurité 
informatique». 

ll recense tous les systè- 
mes de sécurité proposés 
actuellement par plus de 
200 sociétés françaises : 
logiciels, lecteurs de 
cartes à mémoire, audit, 
contrôle d'accès... donne 
un aperçu des principaux 
textes de loi relatifs à la 


sécurité informatique et 
donne la parole aux 
experts pour des consells, 
des recommandations face 
au problème. 


Enfin un sondage fait ap- 
paraître que les entreprises 
sont plus sensibles à la 
protection (coffres ignifu- 
gés) qu'aux conseils ou au 
soft. M 


PETIT ET 
COSTAUD 





Loriciels qui veut que ses 
logiciels soient correcte- 
ment utilisés avait remar- 
qué la déficience ou la fra- 
gllité dont font preuve 
certains joysticks. 

Loricieis a donc créé le 
sien. AUX grands maux 
les petits remèdes, 
Loriciels met en vente 
un mini-joystick compact, 
peu encombrant et 
original. H est muni d'un 
autocollant doubie face, ou 
d'une ventouse (au choix) 
qui permettent de le fixer 
n'importe où. Tel les Post-it 
©, fixez votre joystick sur 
les murs, dans votre 
salle de bains ou, plus 
judicleusement, sur votre 
clavier d'ordinateur. 

Très pratique donc, et telle- 
ment mignon. M 


MESSAGES 
SECRETS : 
LE TO-007 





Pour tous ceux qui sont 
atteints d'espionite 

aigüe : il est désomais 
possible de contrer les 
puissances étrangères qui 
cherchent à vous nuire 
dans l'élaboration de vos 
logiciels | 





La société Prodist-Action 
vient de mettre au point un 
papler infalsifiable. 

Le principe est simple : un 
sceau imprimé avec une 


encre invisible qui ne se 


révéle qu'à la lumière noire 
{ultra-vioiette). 

Bien sûr, ce sceau ne peut 
pas se photocopier et vous 
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CHRONIQUES 


vous rendez tout de suite 
compte s| l’on a essayé de 
falsifier un document. 
Avec ce procédé, vous 
êtes sûrs d’avoir à falre à 
l'original, que ce soit un 
acte notarié, un contrat ou 
même une proposition 
commerciale. 

La difficulté est de garder 
secrète la composition de 
l'encre : ils ont 71 compo- 
sants différents ; et Il 
faudrait donc 15 000 
manipulations chimiques 
pour espérer retrouver la 
formule | 

Ce papier marqué à 
l'encre invisible peut servir 
aussi blen à l'écriture 
manuscrite qu'à la frappe 
sur machine à écrire ou à 
la photocopie; et même 
sur imprimante. 

llest de plus, tout à fait 
possible d'y imprimer un 
logo, cachet ou en-tête, 
sans altérer ses qualités. 
Le coût de cette inven- 
tion digne de James 
BOND : moins d'1 franc 
par feuille. 


Par contre, 
vous aurez 

| besoin d'une 
lampe à lu- 
mière noire 
pour contrô- 
ler les 
documents 
(950 F). Si 
vous êtes 
très méfiant, 
il existe un 
Sécurigraph qui, pour 

110 F, vous permettra de 
contre-signer ou d'annoter 
un document sans que cela 
ne puisse se voir (même 
procédé). 


Le Doctor NO n'a qu’à blen 
se tenir! M 


CHRONIQUES 


CHEQUE UP 
ORGANISATION 





Peut être l'arme absolue 
contre les vois de chèques. 
L'idée est de créer sur 
ordinateur un fichier 
comportant le nom de 
toutes les personnes 
s'étant fait voier leur(s) 
chéquier(s) et l'ayant sl- 
gnalé (plaintes). 

lt permettra à des milliers 
de commerçants de savoir 
au moment précis où un 
client leur remet un chèque 
s'il a été volé ou non. 


Un tel fichier existait déjà 
mails était détenu par les 
banqulers, services de 
police et gendarmerie qui 
sont tenus au secret 
professionnel et ne 
peuvent donc pas commu- 
niquer leurs listes. 

C'est sous la responsabilité 
de la Banque de France et 
à l'initiative de 3 commer- 
çants, d'un fonctionnaire et 
d'un Informaticien qu'il a 
été décidé de constituer un 
fichier central. 


Chèque Up Organisation 
(c'est son nom) proposera 
à ceux qui le désire un 
appareil du genre de celui 
qui rédige automatique- 
ment les chèques dans les 
grandes surfaces. 

Mais en plus il pourra lire la 
ligne en bas à gauche du 
chèque qui permet son 
identification. Discrètement 
la machine donnera l'in- 
formation au commerçant 
et refusera le chèque volé. 
A iui d'agir ensuite. En 
plus ia machine indiquera 
l'heure d'émission de 
chèque ce qui permettra 
de détecter les personnes 
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qui auraient l'idée de se 
précipiter au commissariat 
après un gros achat pour 
déclarer que leur chéquier 
leur a été volé plusieurs 
heures avant. Une sécurité 
de plus. 

Dès que la loi permettra 
de le communiquer ie 
fichier sera donc disponi- 
ble. 


D'ici là, prenez garde à vos 
portefeuilles. M 


VIDEO STOCK 








AUCTEL FRANCE, 
conscient du potentiel de 
mémoire que possède une 
cassette vidéo, a dévelop- 
pé et mis au point le 
Gigastore. 


il permet d'archiver sur 
cassette VHS de six 
heures des données, 
jusqu'à 2,5 gigaoctets, ce 
qui est considérable par 
rapport à une disquette 3 
pouces 1/2 (qui ne stocke 
que 320 Ko). 


On peut donc stocker 
environ 8 000 fois plus de 
données sur cassette 
vidéo que sur disquette. 
C’est une belle 
performance! 


MINITEL FAIT SON MAXIMUM 





Déjà 3,6 millions de 
terminaux. D'ici 10 ans ils 
seront 10 millions. 


Vous êtes 20% à avoir 
accés au minitel (dont 30% 
dans les grandes villes). 
Chaque jour, 10 millions 
de personnes utilisent le 
minitel. C'est ce que 
révèle une récente 
enquête. 

L'utilisateur a entre 20 et 
45 ans, une situation 
moyenne à élevée et 


habite dans 60% des cas 
la ville. 

{! s’agit dès à présent d’un 
véritable média de masse : 
plus de 800 000 à Paris, 
300 000 à Lyon et à 
Marseille, 200 000 à 
Rennes et à Lille, de gros 
chiffres qui devraient 
encore grandir. 

C’est pour toutes ces 
raisons que chaque jour 
fleurissent de nouveaux 

et nombreux services 
minitels. M 


3 EN 1 





L'idée de coupler un télex, 
un télétexte et un traite- 
ment de texte à un même 
apparell était bonne. 


Restait à le réaliser, c'est 
ce qu'a fait la SAGEM. 





Le terminal multiservice 
TCX permet l'accès simui- 
tanément aux réseaux 
internationaux télex et 
télétexte. 


On peut émettre un télex, 
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recevoir un télétexte, tou 
ense servant du traite- 
ment de texte. Formidabie, 
non? 

Le terminal est équipé 
d'une imprimante laser, et 
on peut le connecter à un 


lecteur de disquette, il 
devient alors compatible 
avec tout système 
tournant sous MS/DOS. 
PRIX DU PRODUIT : 
59 000F.H 


TEO 





CONCERTO 


DISQUETT 


Toujours dans le 
souci de vous faire da- 
vantage connaître les 
composants d’un logiciel 
etson élaboration, voici le 
chapitre musical. 

Alors  pénétrons 
ensemble dans le 
monde de ces Mozart de 
la micro. Découvrons le 
secret de fabrication de 
ces musiques qui cares- 
sent nos oreilles et quiont 
bien évolué depuis les 
médiocres bruitages des 
débuts. 


A un teipoint qu'à présent cesont 
de véritables génériques de fllms en 
guise d'introduction au jeu, avec solo 
de guitare, batteries, bass, synthé, 
cuivres. époustouflant. 

Qu'il est loin le temps où les jeux 
vidéo privilégiaient uniquement le vi- 
suel. Nous avons deux oreilles, c'est 
pour qu'elles fonctionnent | 

Avec ce dossier nous irons aux 
confins, aux limites du son. Nous 
essaierons d'y voir plus Ciair. Vous 
n'en croirez pas vos oreilles. Ensem- 
bie nous allons franchir le mur du son 
pour essayer de comprendre com- 
ment le technicien s'y prend pour 
greffer cette partie mélodieuse sur le 


POUR 





Echantillon de grosse caisse 


logiciel. Où va t-il chercher ses bruita- 
ges ? D'où viennent les sons de bass 
guitare….? Comment les gèret-il, quelle 
placeprennent-lis dans le programme, 
sur quelles machines et comment 
sont développées les musiques... 
Beaucoup de questions pour encore 
plus de réponses. 


Une chose est sûre, à présent 
lorsqu'un logiciel est développé, la 
partie musicale est aussi, sinon plus 
importante que le graphisme. C'est elle 
qui crée l'atmosphère, met l'am- 
biance : musique cybernétique pour 
Captain Blood (Jean-Michel JARRE), 
musique hollywoodienne pour Bob 
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Morane, guitare hard rock 
pour Opération Jupiter. 

C'est Charles 
Callet (le technicien qui 
crée et développe les 
bandes sonores d'info- 
grames et de Cobra Soft) 
qui va nous guider et 
nous renseigner pour la 
conception de ce dossier. 
il va nous montrer sa 
méthode de travail, sa 
façon de procéder. C'en 
est une, il y en a beau- 
coup d’autres. 


Mais si nous nous intéressons à 
lui, c'est parce que le fruit de son travail 
est vraiment de grande qualité. De plus 
ine se bome pas à la conception de 
musiques, il innove. 1! a développé et 
mis au point sur Amiga un logiciel dont 
laqualité esttelle ques'ilestbien utilisé, 
il peut concurrencer sans problème un 
studio d'enregistrement. 

Je vous explique. Pour faire de 
la musique, il faut plusieurs instru- 
ments : les principaux sont bien Sr 
les percussions, la bass, laguïitare, les 
cuivres. Chacun d’entre eux a un son 
bien spécial. Charies à créé tous ces 
sons (plus de 500 au total) et les a mis 
surdisquette. Il a donc ainsi réalisé une 
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TEO 





impressionnante banque de sons dans 
laquelle Il peut piocher. Pour utiliser 
ces sons, Charles a créé un soft. 





Travail du son sur Atarl 


Grâce à lui 
on peut voir à 
l'écran les notes 
que lon veut 
jouer (fa#, sib.….) 
leur octave, leur 
durée, la nature 
du son, et cela 
pour chacune 
des 4 voles. 
Le tempo est 
réglable ainsi 
que le volume de 
chaque note, 
enveloppe du 
son, l'écho. A 
l'écran on peut 
visualiser la 
courbe de la 
note et la trans- 
former : cou- 
pure, boucle, on 
peut faire débuter le son au milieu du 
signal. 


Et bien c'est avec ce matériel 
que Charles CALLET crée ses musl- 
ques. 

Malheureusement le soft n'est 
pas commercialisé. 


Il cherche des sons qui corres- 
pondent à l'ambiance souhaitée : 
lugubre, humoristique, spaciale, 
action, et crée sa musique. 

Pour gagner de la place il est 
préférable de ne pas composer des 
mélodies trop longues, mals piutôt 
des morceaux qui se répètent et que 
lon assembie ensuite. 
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Pour Atari c'est plus compliqué, 
ce dernler ne possède pas la capacité 
musicale que confère l'Amiga. ll faut 
donc l'aider avec un échantillionneur 
couplé à un synthétiseur. L'échantillon- 
neur est une sorte de formidable 
banque de sons capable d'attribuer un 
son spécifique à chaque tranche du 
synthé. 


Alnsi lorsque j'appuleral sur le ml 
bass, il yaura un son de grosse caisse, 
sur le la # un son de bass, sur le si b 
un son de pneu sur le macadam... 


Charles CALLET 


Tout commence pour Charles CALLET en 1976. Il compose pour 
Eve BRENER «Le matin sur la rivière» (Pathé Marconl) qui sera vendu 
à plusieurs milllons d'exemplaires dans près de 40 pays. Beau début. 

1978, c'est «Voulez-vous danser» (Pathé Marconl) qui sera 
l'indicatif de l'émission de Guy LUX à cette époque. Puls en 1981 
Charles chante pour le pseudo-mime de Ludwig «Radlo Jex Appeal» 
(Polydor). En 1984, Il falt les arrangements de l'album «Nlpone» de 
Gérard LENORMAND. A la même époque Il chante «Zanzibar» sous le 
nom de Charles CALLET. 1985, Il se lance dans la publicité et compose 
les génériques radlo de Flat, Autoblanchl, Pingouin, New Man... 

Puls 1986 : se sont les débuts dans l'Informatique. Il crée 
Amstradeus, logiciel de musique sur Amstrad, fonde sa soclété et 
commercialise ses produits. Dès juillet de la même année, llentre chez 
Infogrames pour les musiques de jeu. 

A présent, Il crée aussi celles de Ere, Cobra Soft et partols FI. 

C'est grâce à ce «lourd passé» de musiclen que Charles crée 
auss! rapidement les musiques de logiciel. 





Ensuite Charles enregistre le 
morceau sur Atari, instrument par 
Instrument. Mails !! prend en général 
beaucoup trop d'octets, en moyenne 1 
Mega, c'est pourquoi on visualise 
ensuite la courbe sur Amiga et la 
travaille de manière à gagner de la 
place, on arrive ainsl à 70 Ko en 
supprimant les blancs etles répétitions 
pour ne garder que l'essentiel, le strict 
nécessaire. Ensulte on réduit de moitié 
(grâce à une fonction du soft) le nom- 
bre d'informations (on y perd un peu en 
qualité de son mais on y gagne en place 
donc en rapidité), on prend une infor- 
mation sur deux. 

À ce stade, labande sonore Atari 
est à peu près prête. l reste à la 
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repasser sur Atarl pour la découper 
en très petits morceaux et on 
s’aperçolt alnsi que beaucoup d'entre 
eux sonten double et on les supprime. 
Ensulte on assemble les morceaux 
pour faire le morceau I 

Ainsi lorsque vous écoutez une 
musique de logiciel elle n'est pas jouée 
en continu, bien au contraire ce sont 
des fractions du morceau que l'on a ac- 
collées, et qui donne l'illusion de la 
continuité. Un peu comme au cinéma, 
l'image n'est pas continue mais décom- 
posée. 


Pour  ies 
bruitages la tà- 
che est beau- 
coup plus sim- 
ple,  léchan- 
tillonneur pos- 
sède un catalo- 
gue de sons : 
verre brisé, 
piule, réacteur, 
cri. et de plus il 
est possible de 
se procurer des 
disques de brul- 
tages (utilisés 
au cinéma) : 
pas dans un es- 
calier en bois, 
horioge, avion, 
respiration. à 
partir de là c'est 
le programme 
qui les assemble au soft. Les bruitages 
se traitent comme une musique. 





Un éditeur de musique 4 voles créé par Charles 


Mais je le sais vous vous posez la 
question : d'où vientce son qui comme 
par magie sort de l'ordinateur, et est 
auss| pur et vrai que sl c'était l'Instru- 

















ment qui l'avait joué? Nonii n'ya nigui- 
tare, nibatterie dans l'ordinateur. Tout 
simplement on prend le son d'origine dit 
analogique, onle digitalise et àlasortie 
on obtient un son dit numérique capa- 
ble d'être compris et restitué par un 
ordinateur. 

Je m'explique : un son analogi- 
que est en fait un courant électrique. 
Le fait de le digitaliser est le fait de 
prendre par exemple 20 000 fois par 
seconde la valeur de ce courant. Ainsi 
ce n'est plus un signal continu mais 
une succession de valeurs. Pour 
éctaircir les idées : c'est un peu comme 
du cinéma entre une image réelle et 
une image filmée qui est une succes- 
sion d'images (24 images par se- 
conde) sauf qu'en son numérique 
c'est plus de 15 000 informations par 
seconde. C'est le principe du disque 
laser. 


Voyons à présent du côté de 
chez Amstrad ; là encore grâce à un 


Charles CALLET en pleine improvisation sur un TO7/70 


logiciel de son cru Charies crée ses 
musiques, les mêmes que sur les 
autres machines. Seulement la pal- 
lette des sons et bruitages est beau- 
coup plus limitée et de moindre 
qualité. Deplus iin'y a plus que 3 voies 
de sortie. Néanmoins il est possible de 
donner l'illusion d'une partie de batte- 
rie grâce aux bruitages (revolver). Le 
logiciel du nom de «MUSIC PRO» est 
lui en vente dans le commerce. 


Sur THOMSON, Charles reprend 
les parties de l’'Amiga et les adapte sur 
nos chers TO. Seulement il n'y a 
qu’une voix de sortie, donc qu’un seul 
instrument à la fois. ll reproduit donc 
uniquement la mélodie. Il faut savoir 
qu'il n’y a de musique que lorsque 
l'image est arrêtée, ceci pour une 
question de rapidité du jeu. 


Et pour la création, et bien 
Charies travaille en collaboration avec 
des graphistes. 
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il voit avec eux l'ambiance qui se 
dégage du jeu. Puis se charge, 
lorsque tout est en place du point de 
vue graphique, de faire la musique. Et 
ça lui prend en général environ? à3 
jours (du début lorsqu'il imagine la 
partition, à la fin, lorsqu'elle est sur 
disquette). 


Comment en est-il arrivé à faire 
des musiques de logiciel ? C'était une 
suite logique à sa carrière de musicien, 
puis chanteur des génériques des 
publicités Flat, Autobianchi ou autres 
apéritifs. Il en est arrivé à louer ses 
services à l'informatique. 


A présent vous savez tout ou 
presque, il ne vous reste plus, lorsque 
vous jouerez, qu'à ouvrir vos oreilles 
aux charmantes mélodies que ces 
savants musiciens composent et réa- 
lisent pour votre plaisir, rien que pour 
votre ouïe. M 

Daniel GRADEL 
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LA MICRO PREND LES 





Il y a deux siècles, le peuple 
français ne s'arnusait pas de voir son 


pays retourné. Seulement voilà, 
demain, c'est 1989, le fameux bicente- 
naire de la révolution, et nous allons 
fêtercommeilse doit l'événernent par 
lequel la monarchie fut abolie et la 
France devint république. 


Mais oul, on peut maintenant 
jouer à la révolution. En effet, après le 
Chapeau de la révolution, le pain de 
la révolution, le badge, le tee-shint, le 
caleçon ou le feuilleton de la révolution 
{que de nornbreux fabricants ne 
manqueront pas de lancer sur le mar- 
ché à cette occasion), voici qu'arrive, 
tout chaud et amusant, le jeu de la 
révolution, sorti tout droit des ateliers 
de trois étudiants des arts appliqués de 
la ville de Lyon : «3/4 Face», c'est leur 
nom. 


Un feu d'artifice 
d'innovations ! 


Nous les avons rencontrés pour 
vous, dans leurs locaux, sombres et 
truffés d'ordinateurs. C'est là que se 
prépare leur révolution. 


TEO:Mais justement, en quoi consiste 
cette révolution ? 
Pierre-François : L'originalité est que 
plusieurs personnes pourront jouer 
ensemble au même jeu des quatre 
coins de l'hexagone. L'utilisateur ne 
communiquera plus seulement avec 
sa machine mais avec d'autres 
joueurs, et cela où qu'ils se trouvent. 

Elle est là cette révolution : du 
jamais vu | 

Un projet de grande envergure 
; les protagonistes (les joueurs) vont 
chacun, au début du jeu, incarner un 
personnage, se meître dans la peau 
d'un révolutionnaire, et évoluer au 
beau milieu des troubles de l'époque. 
Mais là où l'innovation intervient, c'est 
que tous ces joueurs (4 ou 5) joueront 
au même jeu, à la même phase de la 
partie, au même moment, c'est-à-dire 
que les faits et actes des autres 
joueurs, où qu'ils solent, sont pris en 
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INTERVIEW 









compte dans votre partie. Sile Parisien, 
qui incarne le médecin dans le jeu, 
décide de tuer le roi, et blen l'ordina- 
teur du Marseillais qui joue en même 
temps tlendra compte de cet événe- 
ment. 

Pour jouer ensemble, et bien il 
faudra tout sirnplement se donner 
rendez-vous sur minitel, puis se con- 
necter sur la rnême partie. 


TEO : Quelle est «l'histoire» si l'on peut 
dire ? 
Vincent : Le comte Giusappe Balsa- 
mo, dit Cagliastro est emprisonné dans 
la prison se San Lès à Rome, condam- 
né à mort Pendant ce temps, en 
France, se prépare la révolution. Et 
Cagliastro prétend l'avoir prédit, il 
prétend d’ailleurs pouvoir agir sur l'his- 
toire. 
Son but : créer une France troublée 
pour mieux asseoir la société secrète 
dont il est le maître. 
Ses vingt meilleurs disciples (vous en 
êtes) vont se mettre à son service pour 
servir la révolution, faire échouer les 
cornplots royalistes. Tout ceci pour 
rendre Cagliastro crédible. 
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INTERVIEW 


C’est l'époque du serment du jeu de 
paume, le 20 juin 1789. 

Pascal :il faut ajouter à cela que peu 
à peu le joueur s'apercevra que la révo- 
lution est menée sans Cagjliastro, et il 
se détachera du maître pourfaire sa 
propre révolution, entant qu’homme du 
peuple, révoité etcroyanten unidéal de 
liberté. 


Ils ont fait ça 
tout seuls 


TEO : Mais alors dites-moi, quel est 
votre rôle à vous ? 


P.F. : Et bien nous 
avons tous au départ 
une formation de gra- 
phiste. C'est donc nous 
qui réalisons toute la 
partie graphique du jeu. 
V : Chacun de nous 
réalise une scène, un 
décor ou un fond en 
croquis. Puis nous 
fixons le dessin à l'écran 
et nous le reproduisons 
avec la souris. Pour les 
détails nous utilisons la 
loupe. Nous travaillons 
sur Amiga, qui offre de 
belles possibilités gra- 
phiques, en 32 couleurs. 
Même démarche pour les personna- 
ges (20 au total) Nous définissons 
ensemble un profil : ls médecin bien 
portant, l'écrivain public maladif, lecuré 
bon vivant. et ensuite c’est la même 
méthode, nous effectuons une 
maquette que nous mettons à l'écran 
ensuite. 


P : Nous avons avant tout cherché 
le réalisme, faire des sortes de 
peintures chargées de sens, mais à 
l'écran. Les lignes de fuite, les profon- 
deurs de champ, les flous artistiques, 
les déformations selon l'angle. 
Tout y est. 
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L'important était de reconstituer fidèle- 
ment une époque : les objets, les 
costumes, les décors. Ce que nous 
pensons avoir fait. 


lls l'ont falt, c'est exact. La 
qualité des graphismes est assez Im- 
pressionnante. Oui, nous avons été 
bouleversés par le réalisme des 
scènes. 


TEO : Et comment fonctionne le jeu ? 
P.F. : C'est un jeu de rôle, donc peu 
d'animation à l'écran. 

A chaque étape, il vous est proposé 
des possibilltés d'actes parmi lesquel- 
les il vous faudra choisir. La présen- 
tation est originale : ce sont des icônes 
disposées autour de l'écran, le tout 
ressemble à une fresque. 





Chaque icône fait appel à une action. 


V : Peu d'animation mais beaucoup de 
tableaux différents : 150 au total. Nous 
n'avons pas encore fini de tous les 
créer. 


TEO : Et ensuite, qui programme ? 
P.F. : Nous avons un programmeur in- 
dépendant (Gilles Aurray) qui fait la 
plus grosse partie du travail. 

D'autre part, nous avons une collabo- 
ration avec Infogrames qui nous 
donne la main pour résoudre les 
problèmes techniques. 
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Bien sûr, il 
programme 
en Pascal et 
enC, langage 
compilé pro- 
che de la 
machine qui 
permet donc 
un gain de 
place impor- 
tant. Le projet 
est en Cours 
de développement mals Il est déjà bien 
avancé. 





TEO : Très bien, mais les utilisateurs, 
qui j'espère seront nombreux, vont 
devoir, pour jouer entre eux, se con- 
necter grâce au minitel. Or, durée 
moyenne d'une séquence de jeu : 1 à 
2 heures. Autant de 
temps passé sur minitel. 
Cela ne risque-t-il pas 
d'être dissuasif? 

P : C'est exact que 
passer par le 36.15 serait 
particullèrement  oné- 
reux. Nous allons donc 
essayer de connecter les 
joueurs par le 36.14 
(moitié prix). 

D.F. : D'autre part, nous 
sommes actuellement en 
négociation avecla DGT 
(qui gère le minitel) pour 
établir une sorte deforfait 
que le joueur se procure- 
rait et qui lui permettrait 
de participer au jeu à 
moindre coût. Cela dit, il est tout à fait 
possible de jouer seul, sans minitel. 


TEO : Justement, quelles sont les 
composantes du coffret jeu ? 

V : Il y a deux types de coffret : l’un 
comprenant une disquette de Jeu, 
un logiciel de communication ordina- 
teur minitel, un câble de raccordement 
ordinateur minitel (heureusement 
certains Thomson sont déjà équipés 
d’un Modem) ; l’autre comprenant uni- 
quement une disquette de jeu. On peut 
donc jouer seul. 


e[o [le T= 
CN Z 


(CI Re) 11 


AU fond de la galaxie 
régne la cruelle Gremla, 
souveraine tyranique st Incontestée. 
Serez-vous assez témérairé pour 
l'affronter? Attention Gremla est très 


habile et ses stratégies sont mortelles. 


SLAP FIGHT : 


Vous êtes pllôte d'un super avion le 
Slapfighter! Des monstres très 
habiles vous queftent sur la planète 
Grac, Détruisez-les. 


ANBIUNeL 7e 1e 


Couché sur le guidon, debout sur 


A 


la roue arrière vous trouvez le 
désert. La piste s'ouvre devant vous, 
l'aventure commence, 


LeLACU)E 


C'est un film, c'est aussi un jeu où 
vous êtes le plus casse-cou des 
pilotes de la Navy américaine. 
Abaîttez et descendez vos ennemis. 


MANIA C7S\D]2E 


New York! Du métro au ghetto la 
violence est partout. Défiez les 
méchants et soyez le renégade 
cruel et impitoyable. Chaque 
seconde de survie est une victoire| 


FRANCE IMAGE LOGICIEL 


QGSSIONS 


reyses” 


WIZBALL : 


Un monde noir et triste, c'est 

la planète de l'abominable Zark. 
Passez à la conquête de la couleur 
et peignez la planète aux couleurs 
de la vie, avec la balle magique. 


FLASH POINT : 


La troisième guerrs mondiale est 
déclarée. L'Ouast et l'Est s'affrontent 
dans un conflit super-mortel. 
Canons, lasers, strotégls. C'est la 
guerre, gagnez-la| 


* Prix public généralement constaté. 
Thomson MO-TO. Cassette ou disquette. 





INTERVIEW 


TEO : Avez-vous déjà investi dans le 
produit ? 

P.F. : Oul, au total plus de 130 000 F. 
Mais nous avons chiffré nos besoins 
pour mener le projet à terme : 
400 000 F de charges, de divers ma- 
tériels, dont 300 000 F de frais de déve- 
loppement et de programmatlon. 

Blen sûr nous avons cherché des 
sponsors ou des partenaires 
Infogrames semble Intéressé mals pas 
dans l'immédiat. 


Le souci du réalisme 
| 


D'une manière générale, et nous 
l'avons vérifié auprès des sociétés que 
nous avons contactées, les éventuels 
sponsors attendent de voir un produit 
plus élaboré et structuré pour apporter 
leur aide. 


TEO : Qu'est-ce qui pourrait motiver 
votre sponsor ? 

P.F. : Nous travaillons sur des bases 
solides : nouvelle approche du gra- 
phisme avec des techniques proches 
de la photo. 

Le scénario est établien collaboration 
avec des historiens (pour un maximum 
d'information), un scénariste (Renaud 





Terrier) et Rhône 89 (le Comité 
Départemental du Bicentenaire de la 
Révolution Française). 

il y a eu aussi une étude de marché 
avant lancement du produit (avec re- 
cherche de logiciels similaires déjà 
existants). 
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De plus, c'est une Innovationtechnique 


puisqu'il s’agit du premier jeu 
informatique couplé au réseau 
minitel. 


Enfin, la collaboration avec des pro- 
fessionnels : cinéastes, historiens, 
peintres, architectes, écrivains, 
graphistes, joumalistes, musiciens 
(c'est la bande sonore). 

Je crois que nous avons nos Chances. 


Ils les ont en effet si l'on considère 
l'équipe dontils ont sus'entourer, si l'on 


considère aussi leur expérience pro- 
fessionnelle ; expo photos, décors, 
affiches, pages vidéotext sur minitel, 
pochettes de disque, dessins animés. 

En plus de cela, leur projet est 
parrainé par Jacques Rémy Girard 
(césar 88 du court métrage d'anima- 
tion), ce qui lui donne encore plus de 
crédit. 

Pour finir, ces jeunes gens ont, 
gräce à Rhône 89, passé un accord 
avec la Fédération des Oeuvres Laï- 
ques, ce qui permet de faire reconnaî- 
tre le jeu, et de le diffuser auprès des 
écoles. Un aspect éducatif donc qui 
n'est pas négligeable. 


TEO : Avez-vous déjà envisagé des 
déclinaisons sur d'autres machines ? 
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V : Oul, llest 
actuellement 
conçu sur 
Amiga 500 
mais sera 
adapté dès 
janvier 89 
sur Atari, 
compatibles 
PC et Thom- 
son. 


Nous nous occuperons des transcrip- 
tions graphiques. 





Le jeu n’est pas encore prêt et 
nous n’avons eu qu'un avant-goût de 
ce qu'il sera : vous participez à la 
révolution mais ne changerez pas le 
cours de l’histoire ; quoi que vous 
fassiez il y aura bel et bien prise de la 
Bastille. 

A noter, les auteurs ont préféré, 
plutôt que de faire mourir le person- 
nage, l'envoyer en prison pour ne pas 
écourter le jeu. 

Sachez cependant qu'à la fin de la 
partie, vous passerez devant un tribu- 
nal révolutionnaire qui jugera si vous 
êtes un bon citoyen ou un royaliste. 
Votre tête en dépend. 


La suite de cet article se trouve 
page 59 
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INVENTION 





UNE Puce DANS VOTRE 
ss UND) 


SI une Ferrari n'est pas 
à la portée de votre bourse 
mals que Vous rêvez de 
puissance  automoblle, 
l'électronique est là pour as- 
souvirvos désirs. 

Ne croyez pas qu'onva 
vous présenter un nouveau 
logiclel de simulation de 
course automobllie. 

Non, lalssez votre 
TO 8 tranquille, vous le res- 
sortirez tout à l'heure pour 
vérifier si votre budget vous 
permet ces sensations for- 
tes. 


Un jour où les reporters de TEO 
sillonnaient les routes de France à la 
recherche de nouveautés à bord de 
leur puissant véhicule dont nous tai- 
rons la marque (vous comprendrez 
ensuite pourquoi), une R18, turbo 
d'accord mais pas toute récente, les 
dépassa et disparut à l'horizon. En la 
suivant (de très loin) nos reporters 
arrivèrent à Trévoux dans l'Ain où le 
véhicule s'arrêta. Renseignement pris 
auprès des occupants du véhicule, 
l'engin les avait doublés à 220 km/ 
heure. Ce qui est tout à fait répré- 
hensible aux yeux de la loi, mais tout 
de mème un sacré exploit au niveau 
des performances. 





Nos reporters demandèrentbien 
sûr à voir le moteur de ce monstre de 
la route : RIEN ! 

Du moins rien d'anormal : un 
moteur de R18 turbo, ce qui n'est, 
somme toute, pas très impression- 
nant. Toute la différence réside dans 
une toute petite boîte de 20x10 cm 
logés dans un coin avec trois fils qui 
partent se perdre dans le moteur. 

Les trois occupants de la voiture 
ne sont pourtant pas des chauffards : 
Mrs CANOVAS, COQUILLAT et 
LUSTIERE ont la quarantaine et n'ont 
pas l'intention de se lancer dans les 
rallyes automobiles. Ces trois person- 
nages ont simplement mis en commun 


TEO N° 19 - SEPTEMBRE/OCTOBRE 1988 


leurs compétences en électro- 
nique et en mécanique pour 
construire un petit appareil qui 
se monte sur tout moteur turbo 
essence ou diesel : le STEAM- 
TURBO. 

Le principe, comme son 
nom ne l'indique pas, est d'In- 
tervenir sur le taux de com- 
pression du turbo en mainte- 
nant fermé le clapet de dé- 
charge. Ainsi, explique Mr 
CANOVAS, la pression dans le 
turbo atteint immédiatement le 
taux voulu (ce que l'on aura 
pré-réglé lors de l'installation). 
C'en estfini du fameux «coup 
de pied aux fesses» que l'on ressentait 
quand le turbo se déclenchait. Car 
cela cachait en fait un manque de 
puissance avant queleturbon'atteigne 
un haut taux de pression. Avec cet 
appareil la plage d'utilisation du turbo 
est plus étendue et surtout les 
accélérations sont proprement mé- 
connaissables. Mr LUSTERE : «notre 
but n'est pas de pousser une R18 
turbo à 220 km/heure ou une R5 GT 
turbo à 250 knyheure (compteur) 
bien que nous l’ayons réussi lors d'es- 
sais sur circuit; mais plutôt de permet- 
tre un gain de puissance considérable, 
et donc une meilleure sécurité en cas 
de dépassement, ou tout simplement 
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INVENTION 


d’avaler une côte comme s'il s'agissait 
d'une descente». 

Nos reporters ont eu beau ins- 
pecter la voiture sous tous les angles, 
le moteur n'avait reçu aucune modifi- 
cation, si ce n'est ces trois fils qui 
viennent commander les clapets du 
turbo. Par contre ils ont tout de même 
repéré un boîtier noir de 10x8 cm qui 
vient se loger dans l'habitacle (boîte 
à gant ou autre) et qui est relié au 
STEAM-TURBO : il s'agit de la carte 
électronique qui gère les commandes 
de clapet en fonction de l'accélération. 
«Notre souci, ajoute Mr COQUILLAT, 
est de ne pas rendre des voitures déjà 
rapides, encore plus rapides et donc 
dangereuses. Dans ce but, notre 
appareil tient compte de la vitesse du 
véhicule et if se met hors tension dès 
que l'on a atteint la vitesse maximale 
préconisée par le constructeur». 

En d’autres termes, si votre R5 
GT turbo ( que nous avons essayée) 
est annoncée pour 192 km/heure 
maximum, l8 STEAM-TURBO vous 
permettra d'atteindre cette vitesse 
beaucoup plus rapidement, et aux 
alentours de 187 km/heure, l'appareil 
se déconnectera tout seul grâce à une 
cellule photo électrique (même principe 
que les freins A.B.S.). 

Un véhicule gagne en moyenne 
30 chevaux avec l’adjonction de ce 
petit boîtier, avouez que ce n'est déjà 
pas mal quand on connaît le prix des 
préparations pour les rallyes qui font 
souvent gagner bien moins de 
puissance. 

Ainsi, une RS turbo 2 passe de 
165 à 200 chevaux, et les 2 CV... 
restent des 2 CV parce qu'il leur man- 
que un turbo. 

Bon passons aux choses sérieu- 
ses et essayons une R5 GT turbo, 
depuis le temps qu’on en parle. La 
voiture est elle-même déjà assez ner- 
veuse, et justement je ne remarque 
pas de différence avec le modèle 
normal. Mr CANEVAS s'explique : 
«NOUS avons Conçu notre appareil dans 
l'optique d’un accessoire auto. Ainsi, 
ilse pose en 1 heureet s'enlève encore 
plus rapidement ce qui veut dire que si 
vous changez de voiture, vous pourrez 
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transférer votre STEAM-TURBO très 
facilement sur votre nouveau véhicule 
(turbo bien sûr...) Mfaudra simplement 
que le garagiste qui vous l'a installé 
règle certains paramètres : lekilomè- 
trage de la voiture et surtout la 
pression désirée dans leturbo>». Bon, et 
alors | Auraient-ils oublié de monter 
l'appareil sur ce véhicule ? Pas du 
tout, mais le dispositif de commande 
de l'engin, car il ne fonctionne pas en 


permanence, est en fait une petite - 


télécommande. Un essai : je me lance 
dans une côte en 3ème, et alors que 
le moteur donne des signes de fatigue, 
j'appuie sur la télécommande (qui sert 
en l'occurrence de porte-clef). 


Une petite puce 
pour 
un grand bond 
en avant 


Et...c'est un miracle mécani- 
que : le régime augmente aussitôt etje 
suis rapidement obligé de passer la 
4ème pour ne pas atteindre la zone 
rouge ! Il faut être honnête, l’arrivée 
de toute cette puissance en appuyant 
simplement sur un petit bouton, 
quelque part ça flatte le pilote qui 
sommeil en nous ; et en tout cas on 
peut vraiment se faire plaisir avec une 
«voiture ordinaire» pour peu qu'elle 
soit équipée d’un turbo (et du STEAM- 
TURBO Ill). 

De retour en ville, après avoir 
avalé quelques côtes sans même 
m'en rendre compte, j'appuie à 
nouveau sur la télécommande, et 
le ralentissement (sans à-coups) me 
fait comprendre que l'appareil s'est 
déconnecté. Je me retrouve donc au 
volant d'une voiture de série sans 
aucune restriction : deux voitures en 
une |! 

Mr COQUILLAT : «la télécom- 
mande peut paraître surprenante, 
mais tout d'abord on n’a pas toujours 
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besoin de cette surpuissance, et en- 
suite sivous prêtez votre voiture à 
votre fils qui vient d’avoir le permis, 
vous pouvez estimer qu'il manque un 
peu d'expérience, et vous gardez la 
télécommande avec vous pour plus de 
sécurité». 

Et pour ceux qui veulent vrai- 
ment aller vite ? Pas de problème, 
une utilisation en compétition est tout 
àfait possible et pour cela une version 
non limitée en vitesse existe, en sa- 
chant que vous consommez plus de 
plaquettes de freins, de pneus et 
d'embrayage, mais quand on veut 
vraiment se faire peur. 

Par contre si on a un véhicule 
turbo diesel, on peut vouloir, sans se 
faire peur, obtenir plus de souplesse 
car le STEAM-TURBO permet d'avoir 
des réactions tout à fait comparables 
à celles du modèle essence. Les 
essais sur Une Peugeot 505 turbo 
nous ont laissé sans voix : hormis le 
bruit caractéristique au ralenti, rien ne 
nous rappelait le diesel. Une seule dif- 
férence avec le STEAM-TURBO 
monté sur un moteur essence : iln'est 
pas possible de gagner de la vitesse sur 
un moteur diesel, pour des problèmes 
d'injection limitée ; mais incontesta- 
blement vous gagnez de la puissance 
et donc de la souplesse : là encore on 
se fait plaisir. 

De plus, le fait d'être conçu 
comme un accessoire, et donc d'être 
facilement amovible, lui permetd'avoir 
une durée de vie sur plusieurs véhicu- 
les. Ainsi le modèle que nous avons 
essayé avait déjà avalé 100 000 km 
sur trois véhicules ; précisons que la 
R5 essayée avait déjà 94 000 km au 
compteur. 

Un mot encore sur ses qualités : 
en augmentant la pression du turbo, 
vous diminuez la quantité d'essence 
nécessaire. Ainsi, à vitesse égale, il 
faut lever le pied quand on enclenche 
l'appareil, ce qui veut dire que l'on ne 
consomme pas plus d'essence, au 
contraire. | 

Bon, ça y est on a faitle tour 
des possibilités fantastiques du 
STEAM-TURBO, vous pouvez ressor- 
tir votre TO 8 pour vérifier si votre 


budget vous autorise la tranformation 
de votre véhicule en une source de 
plaisir insoupçonnée ? 

Et là, surprise : la mémoire de 
votre ordinateur suffira amplement 
pour retenir le coût de cet accessoire : 


7 500 Francs pose comprise (le prix 
inclut aussi une vidange pour passer 
à l'huile de synthèse, et un règlage 
complet du moteur). Décidément, rien 
n'est laissé au hasard. Quelle que soit 
la réponse de votre TO 8, sachez tout 


de même que si vous avez une2 CV 
il ne faut pas désespérer, mais il 
faudra d’abord adapter un turbo sur 
votre vénérable moteur... M 
«Adresses utiles page 48» 
Amaury D.M. 





Etre Inventeur,ça ne s'invente pas 


Soit, la formule est un peu facile, 
mais elle recouvre tout de même une 
certaine réalité. En général un inven- 
teur n'a pas qu'une seule idée qu'il dé- 
veloppe puis commercialise. Bien 
souvent les parties industrielle etcom- 
merciale ne l'intéressent que moyen- 
nement. Un inventeur fonctionne 
avant tout avec son sens de l'observa- 
tion etensuite avec ses connaissances 
techniques. Et bien souvent une 
invention fait suite à une autre dans 
l'esprit de ces hommes. Dès qu'un 
problème se pose à eux, ils cherchent 
à tout prix une solution rationnelle. 

Nos inventeurs n'échappent pas 
à cette règle, et deux d'entre eux, Mrs 
LUSTERE et COQUILLAT, ont à leur 
actif plus d’une vingtaine d'inventions 
faisant l’objet de brevets. L'une d'entre 





elles part, comme bien souvent, d'un 
constat fort simple : il existe deux 
types d’ampoules, l’une à baillonnette 
et l’autre à vis, mais une maison équi- 
pée avec un système ne peut recevoir 
des ampoules de l'autre standard. Il 
suffirait doncd'inventer une douille qui 
accepterait les deux types d'ampoules 
pour mettre fin à cette aberration. 
L'idée paraît toute simple, et pourtant, 
si vous réfléchissez bien, un tel produit 
n'existe pas. 

Et c'est là le propre de bon 
nombre d'inventions : il suffit d'y 
penser (ou presque). La Bi-Douille 
venait de voir le jour. Les prototypes 
fonctionnent très bien, mais il faut 
ensuite se lancer dans ia phase 
d'homologation. Un problème inatten- 
du s'est posé avec l'AFNOR qui doit 
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juger de la conformité du produit à ses 
normes. Il existe bien une norme pour 
la douille à baillonnette et une pour la 
douille à vis, mais pas pour la douille 
polyvalente. Puisqu'il n'y a pas de 
norme le produit n'est donc pas con- 
forme. Ainsi la Bi-Douille est officielle- 
ment conforme aux normes AFNOR 
pour les douilles à baïllonnette (Il fallait 
en choisir une) mais elle ne peut pas 
être conforme à une norme qui n'existe 
pas. 

Là dessus nos deux inventeurs 
ont rangé leurs prototypes dans un 
carton, et depuis le brevet est à vendre. 
Si vous vous sentez capable de faire 
créer une norme, n'hésitez pas, 


devenez l'heureux propriétaire 
d'exemplaires uniques de Bi-Douille. 
Amaury D.M. 
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[6 = GRAPHE 


Ce nom vous di quelque chose ? C’est bien normal : il s’agit de la suite d'un programme paru dans TEO n°18. Ce 
programme vous permet de tracer des courbes de représentations graphlques de fonctions. Ilest en effet assez fastidleux 
de calculer un grand nombre de points lorsque l’on ne sait pas à quol va ressembler une courbe. 

Le gros avantage de ce programme c'est qu'il accepte toutes les fonctions qui existent dans la syntaxe basic (et elles 
sont nombreuses : X=F(t), Y=F'(t}, les fonctions hyperboliques et bien sûr Y-F(X)). Vous n'êtes pas encore convaincu ? 
Alors écoutez : les courbes sont réutilisables sous Paragraphe, on peut les superposer, fixer les limites des valeurs et 


même les modifier après un premier tracé. 


Ce programme toume en Basic 128 etest un peu lent, mais comment lul en voulolr quand on connaît la longueur des calculs 


à effectuer... 





y=x.sSinx 


2900 IF Ré="N" THEN GOTO 2250 

2910 CLS: CONSOLE, , 152 

2920 ECHX=125/MAX (ABS (X1) , ABS (X2)) 
2930 ECHY=80/MAX (ABS (Y1) , ABS (Y2) ) 

2940 IF LO=i THEN ECHX=MIN(160,ECHX,EC 
HY) : ECHY=ECHX 

2950 LINE (0,100)-(319,100) ,3 

2960 LINE (160+ECHX,99)-(160+ECHX,101), 


3 


2970 LINE (160,0)-(160,199),3 

2980 LINE (159,100-ECHY)- (161,100-ECHY) 
2 

2990 IF CS$="0" THEN FUT (0,0) , T4 (5000) 

3000 FOR T=Ti TO T2 STEF FA 

3010 R=EVAL (CRUNCHS (F$) ) + X=R#COS (T) : = 

R#SIN CT) 

3020 PSET (160+X*ECHX, 100—ECHY#Y) , 1 

3030 NEXT 

3040 LOCATE 0,0,0 

3050 GET (0,0)-(39,24) , T4 (5000) 

3040 LOCATE34, 24: COLOR? , 0: PRINT "3"; :C 

OLOR O,3:PRINT"ENT";: COLOR 2,0:Z#=INFU 
T$():IF ASC(Z#)<}13 THEN 3060 

3070 CONSOLE, ; , 40 


JF. BARLIER 


yes inx/x 


3080 RETURN 

3090 IF ERR=li THEN RESUME NEXT 

3100 IF ERRzé THEN CFT=CFT+1:IF CFT:9 
THEN LOCATE 0, 24: COLORS ,0:FRINT" valeur 
s trop grandes"; :LOCATES4,24: COLOR, 0: 
FRINT"-5"3: COLORO,3: PRINT"ENT" ; : CFTzû: 
COLOR? , 0: A$=INFUTS (13: RESUME 2250 ELSE 
RESUME NEXT 

3110 1F ERR=S AND TST=0 THEN COLORS,0: 
LOCATE 0,24:FRINT"Valeurs impossibles" 
5: COLOR 2,0:LOCATE 354,24: PRINT "-5"3 : C0 

LOR 0,3: PRINT"ENT"; : COLOR, 0: R#=INPUTS 
CD:IF ASC(R#)< +13 THEN GOTO 3110 ELSE 
RESUME 2250 

3120 IF ERR=S AND TST=1 THEN RESUME NE 
XT 

3130 CONSOLE, ,,,0:FRINT ERR3;ERL: RESUME 

DAC HER DEDE IE DEEE DEEE EEE AE NE 

3150 *#DEFINITION DE LA FONCTION * 

FLE RME NE EN X 

3170 LOCATE 0,0,1 

3180 CLS 

3190 IF V$="V" THEN COLOR 2,ûü:LOCATE © 

SO: PRINT "FONCTION 5 "sV#s" = F(X) 

“:GO0TO 3210 
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3200 LOCATE O,0:PRINT "FONCTION at 
ave" = FUTI ” 

3210 FRINT:FRINT: PRINT 

3220 PRINTVSF: "="ssFSE="" 

3230 DO 

3240 A#=INFUTE (1) 


R=sin(2.sina4T) 





32950 IF A$=CHR#(13) THEN EXIT 
3260 IF A$=CHRECS) THEN FRINT A$;" "; 
s FSLEFTÉ(F#,LEN(F#)-1) :GOTO 35440 
3270 IF A$="e" THEN A$="EXF" 
3280 IF C(CVE="R" OR VE="X" OR V£="y"9 
AND CAF="X" OR AF="X") AND RIGHT#(F#,2 
J£ "MA" AND RIGHT#(F#£,1)<%"E") THEN GO 
TO 3240 
3290 F#=F$trA$ 
3300 IF LEN(F#)22Z THEN GOTO 3440 
3310 IF (CLEN(F#) 51 AND ASC (A#) :=<€5 AND 
ASCIMIDE(FE,LEN(F#)-1 ,1))5=48 AND 45 
C(MIDH(FÆ,LEN(F#)-1,199€=57 ) THEN F#= 
LEFTÉ(F#,LEN(F#)-1) sA#="x"+A#: GOTO 329 
(a) 
3320 IF (CRIGHT£(F#,3)="sin" OR RIGHT#( 
F#,3)="SIN") THEN F#=F#$+"(":G0OTO 3440 
3330 IF (RIGHTÉ(F#,5)="cos" OR RIGHT ( 
F#,3)2="C06") THEN F#=F#+"(":G0OTO 3440 
3340 IF (RIGHTH(FF,3)="TAN" OR RIGHT ( 
F#,3)="tan") THEN F#=F#+"(":GOTO 3445 
3350 IF (RIGHT#(F#,5)="]og" OK RIGHT£( 
F#,3)3="LOG") THEN F#$=F#+"(":GOTO 3440 
3360 IF CRIGHT#(FS,3)="ATN" OR RIGHT£( 
F$,3)="atn") THEN F£=F#+"(": GOTO 3445 
3370 IF (CRIGHTE(F#,3)="INT" OR RIGHTF( 
F#,3)="int") THEN F#$=F#+"(":GOTO 3440 
3380 IF (RIGHTS(FE,3)="MAX" OR RIGHTE( 
F#,3)="max") THEN F#=F#+"(":G0TO 3440 
3390 IF (CRIGHT#(FÉ,3)="MIN" OR RIGHTE( 
F#,3)="min") THEN F#=F#f+"(":GOTO 3440 
3400 IF (RIGHTE(FS,3)="AES" OR RIGHTE( 
F#,3)="abs") THEN F$=F#$+"(":GOTO 3440 
3410 IF (RIGHT#(FF,3;="sgr" OR RIGHTE( 
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F#,3)="SQR") THEN F#=F#+" (":GOTO 3440 
3420 IF (RIGHT#(FÉ,3)="EXF" OR RIGHTF( 
F#,3)="exp") THEN F#=F#f+" C":GOTO 3440 
3450 HVS=RIGHTE(FE,2):1F (HY£="SH" OR 
HY#="sh" OR HY£="ch" OR HY£="CH" OR HY 
E="TH" OR HY$="th") THEN F$=F#+" (": GOT 
Q 3440 

3440 FFF=V#+"="4F£: LOCATE G,4: PRINT FF 
F; 

3456 LOOF 

34640 ON ERROR GOTO 3870 

3470 LHYS(1)=F#: T=1 

3480 DO 

3490 THY=Ù 

3300 IF LHY#(T)="" THEN EXIT 

3510 FOR K=1i TO LEN(LHY#(T))-1 

3920 HYS=MIDE (LHYE(T) ,K,2) 

39530 IF CHY£="SH" OR HY#="CH" OR HY£=" 
TH" OR HYF="sh" OR HY$="ch" OR HY#="th 
“) THEN THY=1 : GOTO 3550 

3540 NEXT K 

3550 IF THY=0 THEN EXIT 

3360 DFVS=MIDE (LHYS CT) ,K+2) 

3570 LHY#CT)=<LEFTS(LHYE CT) ,K-1) 

3380 TFG=<0: TFD=0 

3590 FOR H=1 TO LEN(DFY#) 

3600 EFY#F=MIDS (DFYE,M, 1) 

3610 IF ASC(EFY#)=40 THEN TFG=TFG+1 
3620 IF ASC(EFY#)=41 THEN TFD=TFD+i 
3636 iF TFG=TFD THEN GOTO 3é65û 

3646 NEXT 

3650 FHY$=MIDE (DFY#, 1,M) 

JééO IF CHY#E="SH" OR HY$="sh") THEN GF 
YE=LHYE CT) +" (CEXF'+FHYEA"-EXF ("+ FHYE+" 
Ne 

3670 IF (HY$="CH" OR HY£="ch") THEN GF 
YE=LHYE CT) +" CEXF'+FHYE+"HEXEF (+ FHYE+" 
NT 

3680 IF (CHY#="th" OR HY$="TH") THEN GF 
VÉ=LHYEÉ(T) +" (EXF'+FHYEAM-EXF CAF HY EE" 
3) / CEXF"+FHYE+"4EXF C4 HY EE") j ML AZ" 
3690 LHYEIT)=GFY# 

3700 T=T+1:LHYS CT) =MIDE (DFYS#,M+1) 

3710 LOOF 

3720 F$="" 

37306 FOR K=1 TO T 

3740 F#=F$+LHYE(E) 

3750 NEXT FE 

3760 THY=G:FOR Ezi TO LEN(F#)-1 

3770 HYF=MIDE(FE,K,2) 

3780 IF (HY#="SH" OR HY#="CH" OR HY#=" 
TH" OR HY#="sh" OR HY$="ch" OR HY£="th 
“) THEN THY=i 

3790 NEXT EF 

3800 IF THY=1 THEN GOTD 3470 

3810 IF FO=1 THEN X=100,14TX:7TST=EVAL( 
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CRUNCHS (F#) ) 

3820 IF FO=2 OR FO0=3 THEN T=100, 1#TX:T 

ST=EVAL (CRUNCHE (F#) ) 

3830 IF TST=0 AND F$<>"0" THEN COLOR1, 

O:LOCATE1O,S:PRINT Vs" = "SF; " 7777 

7 "sCOLOR2,0:R$=INFUTS (1): G0T0 3150 

3840 IF F#="F0" OR F$="TX" OR F#="LO" 

OR F#="CSU" THEN COLOR1,0:LOCATE10,5:F 

RINT Vs" = "sFgs " 77777 "sCOLORE, OR 

$=INFUTS (1):G0T0 3150 

3850 CLS 

3860 TX=1:RETURN 

5870 IF ERR=2 OR ERK=9 OR ERR=22 THEN 
EL O: Lee _ RAA ME EU El 

ME 3150 

3880 IF ERR=6é AND FD=1 THEN TX=0.01:RE 

SUME 3810 

3890 IF ERR=4 AND (FO=2 OR FO0=3) THEN 

TX=0.01: RESUME 3810 

3900 IF ERR=15 THEN LOCATE 5,5:COLOR 1 
,0:FRINT" Chaine trop longue “; : COLOR 

2,0: RF=INFUT# (1) : RESUME 3150 

3910 IF ERR=11 THEN LOCATE 5,5:COLOR 1 
SC:FRINT" Division par zero “3: COLOR 2 
SO: R#=INPUTS (1): RESUME 3150 

BORN REIN DEN IN SERRE SN DIE DEN DEEE EEE 

3930 **#* CHARGER UNE COURBE F2: 

S94O HR MIE DE NE ANNEE DE DE DE RTE DEEE SEE 

3950 CONSOLEO,24:CLS 

3960 ON ERROKR GOTO 4140 

3970 CONSOLE, ,,,0:LECT=1:GOSUE 4740 
3980 IF N=0 THEN COLOR?,0:FRINT"Fas de 
fichier"; :RES= =INFUTS (1) à RETURN 

35990 LOCATEZE6, Ô: FRINT" Abandon —>"ss COL 

OR 0,3:FRINT" F1";:COLOR2,0: CONSOLE?4 , 
24: CLS: LOCATEO, 24: FRINT" NOM DU GRAFHIQ 

UE :";:LOCATE 20,24,1 

4000 NOME="":D0 

4010 AZY#=INFUT# (1) 

4020 IF AZ#=CHRE (13) THEN EXIT 

40350 IF AZ#=CHR# (144) THEN MDF=1: SET 


4040 IF AZS=CHRE(S3 THEN IF NOM£SÈ"" OT 
HEN NOMF=LEFTS (NOM£, LEN (NOM#) —1 ) : PRINT 
AZF:;" "::GOTO 4040 ÊLSE PRINT AZ#;" "s 


:G0TO 4060 

4050 NOM£=NOMS$+AZ$ 

4060 LOCATE 20,274,1:FRINT NOM#: 
4070 LOOF 

4080 IF MDF=1 THEN MDF=0:CONSOLEO ,24:R 
ETURN 

4090 LOADF NOM$,T4 (5000) 

4100 CLS:CONSOLEO,24,,,2 

4110 LOCATEO,0,0 

4120 PUT (0,0) ,TZ(5000) 

4130 LOCATEO,0,0:FUT (0,0) ,T4 (5000) 


4140 LOCATESà4, 24: COLOR2,0: PRINT"-$"5 20 
OLOR 0,3:PRINT"ENT"; : COLOR 2,0: Z$=INFU 
T$(1):1F ASC(Z#)<513 THEN 4140 

4150 RETURN 

4160 IF ERR=62 THEN CONSOLEZ24,24: CLS: PF 
RINT"Ce fichier n'existe pas"; :LOCATE 
34,24,0: COLOR? ,0:FRINT"-53"3; : COLOR 0,3: 
PRINT'ENT";:COLOR 2,0:Z#=INPUTS (1): 1F 
ASC(Z$)<{)13 THEN 4160 ELSE RESUME 3990 
4170 CLS:FRINT'"Frobleme d’acces a la d 
isquette":FRINT" verifier ":A$=INFUTS 
(1): RESUME 60 

LB HAINE RETIENS 
4190 ‘xx SAUVEGARDE #4 
RCD 7 RAA DIF IEDEDE D DFA 
4210 ON ERROR GOTO 4720 

4220 CLS:COLOR 2,0 

4230 LOCATE 0,0,0 

4240 CONSOLE, ,,,2:FUT (0,0) ,T4(5000) 
4250 :COLORO,3: LOCATED, 24: FRINT" Âxes 
visibles: (D) - Axes effaces: (N)'";:AX$= 
INFUTS (13 : COLOR2,0 

4260 LOCATE 0,0 0 

4270 CONSOLE, ; , , 2: UT (0, 0,74 (5000) 
4280 IF AX#S3:"N" THEN GOTO 4390 

4290 FOR I=ù TO 199 

45300 IF FOINT(160,1)=3 THEN PSET(i60,1 
),0 

4310 IF FOINT(199,1)=35 THEN FSET(159,1I 
a) 

45320 IF FOINT(Ié1,1)=3 THEN FSET(161,1I 
1,0 

4330 NEXT 

4340 FOR J=0 TO 319 

43550 IF FOINT(J,100)=3 THEN FSET(J,100 
1,0 

4360 IF FOINT(J,1013=3 THEN FSET(J,101 
),0 

4370 IF FOINT(J,99)= 
(a) 

4380 NEXT 

4390 LOCATE 0,0,0:GET(0,0)-(39,24),F%1 
3000) 

4400 BOXF (0,0)-(319,32) ,0:COLOR 2,0:L0 
CATEL,1:FRINT'COMMENTAIRES : ecrire le 
S "IFRINT" commentaires puis appuyer 5 
ur —3"ssCOLORO,3:: PRINT "ENT"s : COLOR 0 
153 

4410 BOX(2,6)-(294,26) ,1:LOCATE 0,24:F 
RINT'appuyer sur une touche"s:72#=INFUT 
Æ (1) : COLOR3,0 

4420 CONSOLE , , 32: PUT (0, 0) ,F4 (5000) : LO 
CATEZ,2,1 

4430 DO 

4440 CC#=INFUTE (1) 

4450 IF CCF=CHR# (13) THEN EXIT 


3 THEN FSET(9,99), 
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4460 IF (CSRLINS AND ASC(CC#)=11) OR 
(CSRLIN>20 AND ASC(CC#)=10) THEN GOTO 
4470 ELSE PRINT CC#; 

4470 LOOF 

4480 LOCATE 0,0,0 

aa9û GET (0,0) -(39,24) ,F% (5000) 

4500 LOCATE 0,23,1:PRINT" 


4 

4510 COLOR?,0:LOCATE 0,23,1:FRINT" NOM 

DL GRAPHIQUE 2 "5: NOM#="" 

4520 DO 

4530 NO$=INFUT# (1) 

4540 IF ASC(NO#)=8 THEN IF NOMEE 5" TH 
EN NOME=LEFT# (NOM , LEN (NOM#) -1 ):FRINT 

NO#:" "seNO$::GOTO 4400 ELSE GOTO 4460 
4590 IF NO$=CHR# (13) THEN EXIT 
4Sé0 IF ASC (NO) +64 AND ASC(ND#)<91 TH 
EN NOMS=NOM#+NO$ : GOTO 4590 ELSE GOTO 
4570 
4570 IF ASC(NO#) +96 AND ASC(NO#)<123 T 
HEN NOM#=NOM#+ND#: GOTO 45906 ELSE GOTO 
4580 
4580 IF ASC(NO#) 47 AND ASC(ND#)£57 TH 
EN NOM#=NOME+NO#: GOTO 4590 ELSE GOTO 4 
400 
4590 FRINT NO: 
A&00 LODF 
4610 IF LEN(NOM#):*8 THEN COLOR 1: LOCAT 
E 0,22,1:PRINT'"Nom du fichier trop lon 
g"::G0T0 4560 
4&zù LECT=0:GOSUR 4740 
4630 IF TNO=1 THEN COLORI:LOCATE 0,22, 
1:FRINT'"Ce fichier existe deja "“:; ELS 
E GOTO 4680 
4640 COLOR Z,0:LOCATE 0,23,1:FRINT "VO 
US CONFIRMEZ LE NOM DU FICHIER? O/N': 
2 INF=INEUT# (1) 
4650 COLOR 2,0:LOCATE 0,23,1:FRINT " 


Hs 
: 


4660 LOCATE 0,22,1:FRINT" 

4670 IF ZN#&{>"o" AND ZN#£:"0" THEN GOT 
Q 4500 

4680 LOCATEO,6,0 

4490 CONSOLE, ,,,2:PUT (0,0) ,F% (5000) 
4700 SAVEF NOM$,F% (5000) 

4710 RETURN 

4720 CLS: FRINT'"Frobleme d'acces a la d 
isquette":FRINT" verifiez":A#$=INFUTS 
(1): RESUME é0 

47350 “HAAREAMEEREENERERENLEERÉRÉE 
4740 ‘## TEST NOM DU FICHIER  ## 

47 SO 7 A LE EN DRE EE ER ER 
4760 TNO=0 

4770 ZA#=NOMF: L=8-LEN(ZA#) 

4780 FOR Ezi TO L 
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4790 ZAS=ZA#+" " 

4800 NEXT E 

4810 A$=7A$+".MAF" 

4820 N=0 

4830 FOR S=3 TO ié 

4840 R#=DSETI# (D,20,S) 

4850 FOR Izi TO LEN(R#) STEF 32 

4860 IF ASC(MID#(R#,1,1))=0 GOTO 4910 
4870 IF ASCIMIDH(RE,1,1))=255 THEN EXI 
Fr # 

48806 IF MID#H(R#,I+8,35)<5%"MAF" THEN 491 
le) 

4890 N=N+i: TH (N)=MIDE (RE, 1,8)+", "MID 
(R$,1+8,3) 

490û IF (A$=T#(NY AND LECT=0) THEN TNO 
=1:G0T0 4980 

4910 NEXT I,S 

4920 IF LECT=0 THEN RETURN 

4930 LOCATE O,2:COL0OR 1,0:FRINT'"'Fichie 
rs existants'":COLOR 2,0:CONSOLES,21 
4940 FOR Ez4 TD N+3 STEP 4 

4950 FRINT LEFT#(T#(K-3),8)5;"  "sLEFT# 
(TEE 2,8)" MLEPTEUTE(R= 1,875" 
sLEFT#(T#(E) ,8) 

4960 NEXT 

4970 CONSOLE 0,24 

4980 RETURN 

AQOÛ0 HAE REOMON DONNE APM DE DE DE DE HE DE DE DE SON 
5000 ‘#3 IMPRESSION #* 
SOLO THEN DEMI DE ME DE TEE AE DE DEEE DEEE DE DEEE 
9020 CLS:COLOR 2,0 

3030 LOCATE 0,0,0 

53040 CONSOLE, ,,,2:PUT (0,0) ,T4 (5000) 
5090 :COLORO,3:LOCATEC,24: PRINT" Axes 
visibles: (0) - Axes effaces: (N)";:AX#= 
INFUT# (1) : COLOR ,0 

3060 LOCATE 0,0,0 

5070 CONSOLE, ,,,2:PUT (0,0) ,T4 (5000) 
5080 IF AX$<:"N" THEN GOTO 5190 

5090 FÜR I=0 TO 199 

5100 IF FOINT(160,1)=3 THEN FSET(I60,I 
),0 

5110 IF FOINT(159,1)=35 THEN FSET(159,1I 
RER) 

5120 IF FOINT(I1é1,1)=3 THEN PSET(Ié1,1 
LE 

5130 NEXT 

5140 FDR J=0 TO 319 

5150 IF FOINT(J,100)=3 THEN FSET (9,100 
1,0 

oié0 IF FOINT(J,101)=3 THEN FSET (J,101 
4 

9170 IF FOINT(J,99)=3 THEN FSET (J,99), 
Ô 

9180 NEXT 

9190 LOCATE 6,0,0:GET(0,0)-(39,24) ,F4( 
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5000) 

3200 EOXF(0,0)-(319,32),0:COLOR 2,0:L0 

CATEI , 1: FRINT'COMMENTAIRES : ecrire le 

s ":FRINT" commentaires puis appuyer s 

dr —=##5s:COLORO,3:3:PRINT "ENT :COLOR 0 
53 

9210 HOX(2,464)-(294,26),1:LOCATE 0,24:F 

RINT'appuyer sur une touche"; :7$=INPUT 

#(1):COLOR3,0 

5220 CONSOLE ,,,,2:FUT (0,0) ,F4 (5000) :LO 

CATEZ,2,1 

5230 DO 

5240 CCF=INFUT# (1) 

S290 IF CCF=CHR# (13) THEN EXIT 

9260 IF (CSRLINES AND ASC (CC#)=11) OR 
(CSRLIN:20 AND ASC(CC#I=10) THEN GOTO 

9270 ELSE FRINT CC#: 

5270 LOOF 

LOCATEO,0,0:GET(0,0)-(39,24) ,F4(5 

G00 

9290 LOCATEG, 24: COLORO,35:FRINT"Imprima 

nte prete (O/N) ?"3:IF#=<INFPUT# (1) :COLO 

R2,0 

9300 IF IFFES:"N" THEN FUT (0,0) ,F4 (5060 

) :LOCATEO ,0, 0: SCREENFRINT 

310 COLORE,0 

9320 RETURN 

DSC AM MN RE DE DEN EME DEEE SEE DE DEEE JO EEE 

J340 #4 SUFERFOSITION ## 

DIS O 7 HAN AN DES DE HE DE DE DEN DE DE DD EE SE DE DEEE 

9360 CLS:CONSOLE, ,,,0:LOCATE 0,5: FRINT 
“1. Calcul automatique de l’echelle": 

9370 LOCATE 0,6:FRINT" en repere nor 

me": 

3380 LOCATE 0,7:FRINT"2. Definition de 
l'echelle avec une ": 

9390 LOCATE 0,8:FRINT" 

0400 LOCATEG,24:COLOR1:FRINT"'CHOIX";::G 

#=INPUTS (1) : COLOR 

2410 IF VAL(G#)=0 OR VAL(G#) 2 THEN 60 

T0 5400 

9420 CLS:CONSOLE, ,,,2:PUT (0,0),T2(5000 
}):LOCATE 0,0,0:GET(0,0)-(39,24),S4(500 

Q) < 

2430 IF G$f="1" THEN GOTO 5590 

5440 LOCATE 0,0,0:FO0OR I=i TO 3O:PRINT 
" "ssNEXT2LOCATEO, 1,0:COLOUR S2FRINT "Er 

ille d'aide de 10 en 10":COLOR2:LOCATE 

G,0,1:FRINT'ECHELLE de X ? s:"3:FOR I=1 
TO 31:FO0R J=2 TO 19:PSET(I#10,J*10),3 
sNEXT J:NEXT I 

3450 ECH$="" 

54ëû DO 

47 EH$=INFUT# (1) 

3480 IF EH$=CHR#(8) THEN FRINT EH#;" 
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3 EH; : ECH#=LEFT# (ECH#, LEN(ECH#)-1)} : GOT 
O 5500 
5496 IF EH#=CHR# (13) THEN EXIT ELSE FR 
INT EHf: : ECH$=ECH#+EH# 
9900 LOOF:ECHX=VAL (ECH#) 
9910 LOCATEO,G:FRINT" 
“: : COLOR2: LOCATED, 
G,1:FRINT"'ECHELLE de YŸ 7 :"; 
9920 ECH#="" 
993350 DO 
5940 EH$=INFUTS (1) 
9J990 IF EH$=CHR# (8) THEN FRINT EH#;" " 
EH: : ECH#=LEFT# (ECH#, LEN(ECH#) -1) : GOT 
0 5570 
5560 IF EH#=CHR# (13) THEN EXIT ELSE FR 
INT EHf; : ECHF=ECHE+EHS 
G970 LOOF:ECHY=VAL (ECH#) 
94380 RETURN 
9390 ECHY=G:FOR K=10 TO 99 
9600 IF FOINT(Iéi,K)=3 THEN ECHY=100-K 
:GO0TO 54620 
5410 NEXT E 
9620 IF ECHY=0 THEN GOTO 5710 
9630 ECHX=0:FOR K=iéi TO 319 
9640 IF FOINT(E,101)=3 THEN ECHX=K-160 
:GOTO 5660 
9650 NEXT E 
9660 IF ECHX=G THEN GOTO 5710 
né70 IF ECHX<:ECHY THEN GOTO 5710 
9680 LOCATE 0,0,0:FRINT'echelle de *X e 
t de Y : "s ECHX; 
J650 LOCATES4,24: COLOR? ,0:PRINT"-5"52:C 
OLOR G,:3:FRINT"ENT": : COLOR 2,0:7#=INFU 
THOD):IF ASC(Z#)£ 513 THEN 5690 
9700 RETURN 
9710 CLS:COLOR 1:LOCATE 15,5:FRINT"IMF 
OSSIRLE":COLOR Z:1IF ECHX=0 OR ECHY=G T 
HEN LOCATE G,10:CO0OLORS ,G:FRINT" gradua 
tion effacee":COLOR?,0:G0T0 5720 ELSE 
LOCATE 0,1G:COLORS,0:FRINT "repere non 
norme":COLOR?,0:G60T0 5720 
9720 COLOR 1,0:LO0CÂTE Ô,13:PRINT"1.";: 
COLOR2,0:FRINT " 4BANDON" 
9730 COLORI,G:LOCATE 0,15: PRINT"2,"seC 
OLOR2,G:FPRINT" Definition de l'echelle 
avec une “3; 
974ù LOCATE O,1ë&:FRINT" 
e"; 
9790 LOCATEO,24:COLOR1:FRINT"CHOIX";:N 
G+=INFUT# (13 : COLORZ 
9760 IF VAL(NGE)=<0 OR VAL(NGE) :2 THEN 
GOTO 5750 
9770 IF VAL(NG#)=Z THEN G#="2":G0T0 54 
20 
5780 CS+="N":CSU=2:CSF=0 
3790 RETURN 
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20-22, rue de Montreuil - BP 72 - 94302 VINCENNES 


BOUTIQUE FAMILIALE - Tél. (1) 43.28.22.06 
BOUTIQUE PROFESSIONNELLE - Tél. {1} 43.28.00.71 


REVENDEUR OFFICIEL THOMSON 
Ouvert du mardi au vendredi de 10h30 à 13h et de 15h à 19h - Le samedi de 10h30 à 19h - A 100 m du RER Vincennes et du Mélro Châteou-de-Vincennes. 


PROMO PC AUTOMNE (e]:7: 1") 


1TO16 PC M A GAGNER! AA 


THOMSON © OU 
2° PROMO : 


TO16 PC 


+ ÉCRAN COULEUR 


+ IMPRIMANTE 
SEIKOSHA SPI 80 AI 


LULU Le 





{1 carte synthétiseur vocol 990 
Voix de synthèse, effats spéciaux, ompli audio 3 W, 
logiciel phonétique à Caicle du texte simplifié. 
LJ'carte sampler vocal F 1° PROMO : 
Enregistrez votre voix, puis utiisez-là dans vos C 


programmes, T O ] 6 P C à 
DIGITALISEUR ARA G 
: + ÉCRAN MONO 


Ce digitoliseur vous permettra 
son seulement de digitaliser des + CARTE DISQUE 
DUR 20 Mo 2 


images vidéo provenant d'une 
+ WORD JUNIOR EE 1 eu 


+ MULTIPLAN 


provenanl directement de voire 
TV. Entièrement français. 
2350F 
JUNIOR 
+ FLIGHT 
CREDIT 1'€ échéance 
JANVIER 1989* 
535, 20 F 350 F 
/mols /moi 
x 25 ar x 34 #4 


D digitoliseur ARA 
STAR LC 10 
couleur 
SIMULATOR 
+ IMPRIMANTE 
tation 
de. ie CETÉLEM. 


. 3290F 


CE Carte disque dur 20 Méga 
. 3990F 


D Carte disque dur 30 Méga 





Souris “intelligente”. HANDY SCANNER 
scanne  inslanionément fous vos 
documents. Vous lo“promenez" surune 
photo, texte. cl vous en avez lacopie à 
l'écron. Un puissont logiciel d'enphoi- 
tation comporiant de nombreusesfonc- 
tions vous permet toutes Îes extravo- 
gancer possibles ! 
Disponible sur 18M PC/XT/AT ou 
compatible, 

Hondy Scanner At 
‘avec point + reader) 


HANDY 


@ Tête d'impression 
9 aiguilles 
@ Vitesse d'impression de 100 cps 
en mode listing et 16 cps en NLQ 
@ Entraînement du papier par friction ou traction 
© Plusieurs styles de caractères 
L] imprimante SEIKOSHA SP 180 


LL 


BLIIU LYS 
@ Tête d'impression 9 aigles 

SEIKOSHA SPI 80 AI 
+ CÂBLE 


@ 8 nuances de couleur 

l'imprimante accepte aussi les rubans noirs 
@ Interface parallèle centronics 
@ Alimentation feuille à feuille en option 


Cj imprimante STAR LC 10 couleur 1590F 


3290F 
11250F 
13034F 


7694F 
9476F 


O TO 16 PC HD 20 Mo + écran mono + Pack . 
OTO 16 PC HD 20 Mo + écran coul. 

D TO 16 PC XP dble drive mono... ... 
O0 16 PC XP dble drive coul, + Pack 


DISQUETTES VIERGES 


5325F 
6990F 
5690F 
6990F 


DTO 16 PC écran mono. 
D T0 16 PC écran couleur 
D T0 16 PC M {modem integ.] mono 
O TO 16 PC M (modem integ.] couleur 14813F 
D Contrôleur de dés 
D Lecteur disg, QDD 


Q TO 16 PC HD 20 Mo, écran EGA 


O Contréleurmanane …...160F 
C Crayon optique 

CI Eciensible incrustation 499 F 
D Extension mm 256 KR 490F 
D Brtension mêm 64 K 

D Extension mêm 8 K(TO7).…. 

O Housse dovier 

C Housse moniteur 


En cadeau 4 
1 joystick 
+ 4 logiciels 


de jeux CS'UMDFDO par 10 


0 3"12DF.DD por 10. 
0 2"8- QDD par 10 


DEMANDEZ 
NOTRE 
CATALOGUE 
THOMSON 
 Joyrtodkswitdioy ……… IASF FAMILIAL 


T07/107 70/MO 5/MOQ 6 
DEMANDEZ NOTRE CATALOGUE 


ni 
au 


LA 





D Intertoce RS 232 … 49F 
D Cüb. imp. MOS-T07-70 175 
D Côb. im MO-TOBT09 WSF 
O Cort. RAM na.:re MOS 

© Colvier méconi TO7-70 

D Coll réf CHE … 
© Contrôleur communico. 

0 Imprimante PR 90612. 


2990 F 
4690 F 
. 1490 F 


D TOBD + câble péritel... 
CO TO8D + monit. couleur 


240 F 0 TO6..…. 


TO7/107 70/MO5/MO 6 
DEMANDEZ NOTRE CATALOGUE 


D Aquanaute 
D Atamik 
[] Blue stor 
D Bobo... 
D Défi av torot.. 
D Don Camillo 
OC Crozycar , 
© Flashpoin . , 
D Enduro Racer 
D Garden Party 
CO Game Over 
D tznogoud 
NA C1 L'histoire et les j jeux 
O1 Lo marque jaune 
D Les Athiètes 
D Sport d'été 
© Oxphar 
D Space Game. 
D Super gare 
CO Wizzball ; 


DNNæNNN=æsN NN 
Ve ON == 0 ON 0 me 
onoLoonnouoco 
PANNE NNNNMNMN 


(eL11v11 


EDUCATIF 
[1 A la découv. homme 
CO Apprends-moi écrire 
D Apprends-moi lire .. 
D Au nom de lhermine .. 
Li Au temps jadis 4 
D Aux origines de lo vie . 
C1 8vlede ou poys de Big-Ben .. 
[=] tro 3 3°/TERM. co 

à Modrid 
B Fcengoin CE/CM 
CO Français CM/6° 
D François CP/CM 
CO H était une fois 


D 2009 av. J-C 

D Boîthazar 

D Bivouac 

0 Blitz …s . 

C] Blue war. 

[ Bob Winner . : D M 
D Corré d'as.. ; CO Nitr 
Di Défi av tarot. [1 Pack QE 

[1 Dossier Boerhaove , CO Pla: 

D Entropie .. snenooune CO Prohibi ti are 
DFI5 Strike Eagle … ns [1 Quad " 
[1 Grand Prix 500 cc. D} Robinson Crusoë 
© HMS. cobra. Ë Re CR 

[1 Pulsar : Yéfi ! Éliminoror ne . 5 Le soleil et ses planètes 
D Spindi : Barry ! Hacker B Et Fi 12 Le temps d'une histoire ...…. 
DO L'affaire Sydne [=] sucer hi : 2e C3 Moths CM2/6° Mesures Grandeur 
© L'affaire Vera O0 TNT. 12 Maths collège. 

Q L'héritage [ Tout schuss 11 Maths succes 4 | 

O1 Les Dieux de la mer. D Trivial Pourquite [2 Rédaction …. 

D Les Ripoux [1 Sac à dos 


…. LISTE NON EXAUSTIVE PLUS DE 1 000 LOGICIELS EN STOCK 


Crédit immédiat pour tout achat supérieur à 1 500 F - Carte de crédit Aurore et Pluriel bienvenues 


UTILITAIRE 
Ci Assembleur 
CI Budget familiol 
Et Coractor Hi .. 
C1 Colarcol C+ .. 
Li Colospaint .. 
L! Comptobitité générale 
D Fiche et dossiers 
D Graphique 
C Le journaliste 
EL Loto . . 
D M. Banque 
[1 Mallette comm 735F 
C1 Maltette guion es ni fo 1395 
Lt Muttiptan TO 8 720 
EI Music 3 voix .. 
L! Poragraphe TOB . 
[1 Porte! eue boursier 
D Statistiques 
D Studio 
CE: Vie et mort des dinosaures 1 


(el{1e11 


COMMENT COMMANDER : Cacher lels) article!s) au faites une liste sur feuille à part - Faites le total + Frais de port (25 F pour achoïs inférieurs à 500 F, 45 Fde 500 à 1000F, 65 F de 1000 Fà 2 000 F, 85 F pour achat supérieur à 2000F) 
4E POSSÈDE UN ORDINATEUR DE MARQUE : TYPE : MONITEUR coul [|] mono [I 
Nom : Adresse : ——————————— 4" — 
LLC Re ç | RC 
Envoyer le tout à ORDIVIDUEL - 20, rue de Montreuil - BP 72 - 94302 VINCENNES 


Signaïure Le 4 


a Code post : 
Prix TTC - Mode de paiement : [: Chèque / C Mandat / [ Contre-remboursement (prévoir 25 F de frais) - 


CB n° de carte Li à 5 À à à | 4 à À , , |] Dote de validité 


PHOTO NON CONTRACTUELLE. 
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UN HEUREUX | 
EVENEMEN | 


FAITES COMMUNIQUER VOS (ORDINATEURS 
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C’est la grande 
réconciliation 
dans la famille 
Thomson: le père 
MOS5 adresse 
enfin la parole à 
son fils TO8, 
quant à la jeune 
TO9+, elle se 
confie pour la 
première fois à sa 
mère TO7/70. 
Leur cousin PC 
se réjouit lui 
aussi car il va 
pouvoir recevoir 
des nouvelles de 
toute la famille. 
Derrière cet évè- 
nement histori- 
que se cache un 
négociateur qui a 
su rester simple : 
la cassette audio. 


Quoi de plus dommage en effet 
que d'avoir deux ordinateurs de la 
même marque et de ne pas pouvoirles 
faire communiquer. Allez expliquer à 
un TOB qu'il devrait parler à son frère 
le TOS et vous vous heurterez à un mur 
de silence. 


Alors pour ce qui est des relations 
TO - MO, c'est la guerre froidel 


Pourtant ils meurent d'envie de 
s'échanger des expériences en basic. 
laura fallu attendre 1988 pour qu'un 
petit être magnétique appelé «CAS- 
SETTE» puisse servir d'intermédiaire, 
et ceci sans aucune intervention au fer 
à souder! Soit, la cassette est lente et 
moins pratique qu'une disquette, mais 
elle est universellement répandue et 
peu onéreuse; et surtout, c'est le seul 
support qui soit commun aux différents 
Thomson 8 bits. 


Les disquettes n'ont pas le même 
format physique (3"1/2 sur TO8 ou 
TO9, 5"1/4 sur les autres machines) ou 
logique (160, 320 ou 640 Ko répartis à 
raison de 16 secteurs par piste et 128 
ou 255 octets par secteur pour les 
machines Thomson, 360 Ko à raison 
de 9 secteurs par piste et 512 octets 
par secteur pour les compatibles PC). 
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Redécouvrez les vertus 
de la cassette 


De plus, on ne dispose pas forcé- 
ment sur chaque nano-machine d'un 
lecteur de disquettes, relativement 
cher, alors que le magnétophone 
{lecteur enregistreur de programmes 
ou LEP selon la terminologie Thom- 
son) fait partie quasi obligatoirement de 
l'équipement standard. 


La communication entre nano- 
machines Thomson et compatibles PC 
par la voie série a déjà été décrite par 
ailleurs (voir article de G.Noël dans le 
bulletin Enseignement Public et Infor- 
matique n° 47 de sept. 1987). C'est 
d'ailleurs la seule possibilité pratique 
d'échanges lorsqu'on n'a pas accès à 
un Nanoréseau. Le débit d'information 
peut être plus rapide : 2 400 bauds au 
lieu de 900 (TO) ou 1 200 (MO) pour 
le transfert par cassette. On retrouve 
par contre l'inconvénient du prix (l'in- 
terface série n'est pas incluse sur les 
nano-machines Thomson) et une con- 


trainte de proximité entre les deux 
machines. 


Le support cassette étant retenu, 
en particuller pour des raisons de coût 
moindre, il n'y a plus qu'à échanger 
programmes ou données par son 
intermédiaire. 


Deux problèmes restent cepen- 
dant à résoudre : 

- les cassettes ne sont pas en- 
registrées de la même façon sur TO 
{modulation par déplacement de fré- 
quence) et sur MO (modulation par 
déplacement de phase)! 

I! sera donc nécessaire d'installer 
sur TO un périphérique CMOS : cor- 
respondant à la lecture ou à l'écriture 
sur cassette au format MOS. L'hypo- 
thèse faite étant que tousles échanges 
se feront sur cassette au format MO5 
et que l'on pourra éventuellement dé- 
placer un LEP de MOS vers une ma- 
chine TO. 

- l'ordre COPY du DOS-BASIC 
Thomson ne permet pas le transfert 
d'une disquette vers un autre périphé- 
rique (voir par exemple le manuel du 
TO p. 108). 

ll sera donc nécessaire d'utiliser 
un programme de transfert de fichiers 
si l'on souhaiïte échanger des données 
par le véhicule commun cassette. 

Voicl donc les différentes procédu- 
res nécessaires à l'échange de don- 
nées : 


Les TEO parlent 
aux MO 


Enregistrement depuis une ma- 
chine TO(7/8/9...) : 


En BASIC 1.0, exécuter le pro- 
gramme CMOS.BAS qui fait appel au 
fichier binaire CMOS. BIN pour créer un 
périphérique CMOS5:. Ces program- 


REPAIRE 





mes ont été aimablement communi- 
qués par la SAVEMA : voilà au moins 
un exemple où le service après-vente 
n'est pas un vain mot | Ce périphérique 
CMOS: permet à une machine TO : 

- d'écrire (par SAVE, SAVEM, 
INPUT#) sur un magnétophone TO7 
des cassettes au format MOS ; 

- de lire (par LOAD, LOADM, 
INPUT#) et d'écrire (par SAVE, SA- 
VEM, PRINT#) sur un magnétophone 
MOS5 des cassettes au format MOS5. 


Lecture sur MO des cassettes pré- 
cédemment enregistrées. 

Comme àl'accoutumée par LOAD, 
LOADM, INPUT# depuis le périphéri- 
que CASS:. 
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Les MO répondent 
aux TO 


Enregistrement depuis une ma- 
chine MO. 


Comme à l’accoutumée par SAVE, 
SAVEM, PRINT# sur le périphérique 
CASS:. 

Leciure sur TO des cassettes pré- 
cédemment enregistrées. 

En BASIC 1.0, exécuter le pro- 
gramme CMOS5.BAS. 
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La lecture sera possible seule- 
ment sur un magnétophone MOS par 
LOAD, LOADM, INPUT# depuis le 
périphérique CMOS: 


Les THOMSON enfin 
compatibles 


Le transfert se fait entre une nano- 
machine du réseau et la tête de réseau 
(compatible PC... ou même non com- 
patible comme le SILZ"16 de Leanord). 

Les transferts précédents permet- 
tent de passer d'un TO (7/8/9) vers un 
MOS supposé être en réseau (cas le 
plus fréquent) et, de là, Vers le micro- 
ordinateur 16 bits ou vice-versa. 

Exemples de transferts : 

La séquence d'opérations RUN 
a«CMO5» 

LOAD «0:programm.bas» 

SAVE «CMO5:programm.bas» 

transport de la cassette 

LOAD «CASS:programm.bas» 
permet de transférer un programme 
BASIC enregistré sur une disquette 
TO vers un MO (5/6). 

La séquence d'opérations RUN 
«CMOS» 

LOAD «CASS:programm.bas» 

SAVE «CMOS:programm.bas» 

transport de la cassette 

LOAD «CASS:programm.bas» 

SAVe «1 :programm.bas» 
permet de transférer, vla un MOSen 
Nanoréseau, un programme BASIC 
enregistré sur une cassette TO vers 
une disquette Nanoréseau, lisible par 


un compatible PC. 

La séquence d'opérations 

SAVEM «CASSichier .bin»début, 
fin,exec 

transport de la cassette 

RUN «CMO5» 

LOADM «CMOSïichier bin», dé- 
calage 
permet de transférer un fichier binaire 
(programme en langage machine ou 
sauvegarde d'une zone mémoire) d'un 
MO vers un TO. 

Attention au cas des flchiers 
binaires : 

La carte mémoire n'est pas la 
même sur TO ou sur MO I Il est donc 
nécessaire d'utiliser un décalage cor- 
rectement calculé lors du transfert d'un 
tel fichier binaire. Sivoustransférez un 
programme en langage machine non 
translatable, attendez-vous à des diffi- 
culés… 

Ecrits en BASIC, ils permettent 
d'échanger des fichiers de données ou 
des fichiers texte non susceptibles 
d'être manipulés globalement comme 
le sont les fichiers programmes BASIC 
par des commandes du type SAVE ou 
LOAD (nous avons déjà signalé que 
l'ordre COPY du DOS-BASIC Thom- 
son ne permet pas le transfert d'une 
disquette vers un périphérique autre 
qu'un lecteur de disquettes). On trai- 
tera des fichlers codés en'ASCII, seul 
cas pratiquement Intéressant. 

La solution retenue consiste à ire 
et transférer les fichiers caractère par 
caractère grâce aux Instructions IN- 
PUT#(1,#1) et PRINT#2 où le canal 1 
est ouvert en entrée et le canal 2 en 
sortle. 

On aurait pu penser utiliser LI- 
NEINPUT#1, à priori plus raplde, mais 
qui présente deux inconvénients : 

- Une ligne de texte peut contenir 


TEO PROMO 


plus de 255 caractères, longueur 
maximale d'une chaîne manipulable 
par BASIC, ce qui conduirait alors à une 
perte d'informations ; 

- un fichier texte ne se termine pas 
forcément par un «retour chariot» CR 
(code 13), ce qui conduit alors à une 
erreur INPUT PAST END. 

Deux autres écueils ont dû être 
contourmés : 

- Sur disquette Thomson, uneligne 
de texte (par exemple dans un fichier 
ASCII créé par le traitement de texte 
PARAGRAPHE) se termine seulement 
par CR et non par l'habituel CR (car- 
rlage return, code 13) +LF (line feed, 
code 10); 

- le LEP Thomson insère CR après 
chaque donnée inscrite (même par 
PRINT#2, a$; suivi d'un point virgule). 

Les programmes suivants permet- 
tent les transferts de fichiers : 

- TRANSTO.BAS, exécutable sur 
TO; 
- TRANSNR.BAS, exécutable sur 
MO, isolé ou en Nanoréseau. 

Ces deux programmes utilisent la 
cassette soit comme source, soit 
comme destination ; lis permettent 
aussi des échanges entre unités de 
disquettes, mais les commandes du 
DOS sont plus rapides dans ce cas-là. 

Ces deux programmes ont la 
même Structure, abondamment com- 
mentée dans le texte source lui-même. 

Cette série de petits programmes 
met fin à une broullle qui duralt depuis 
plusieurs années dans la famille 
Thomson; un comble à l'ère de la 
communication! 

Vollà, je me retire surla pointe des 
pleds pour ne pas troubler ces émou- 
vantes retrouvailles, bons trans- 
ferts...M 

Lucien SOUROUILLE 


Dans ce numero Il n'y a pas de Promo spéclale, et pour cause: nous n'avons pas trouvé de produit Thomsoniste à des 


prix suffisamment interressants. Par contre la TEO PROMO du n°18 (p.43) est toujours valable, et les prix n'ont pas 
bougé : plus de 50% de réduction. A l'exception de l'ouvrage n°4 qui est épuisé. Pour celte raison la collection TO7/ 
70 passe à 60 francs (au lieu de 95 F.) De plus le mode d'emploi du programme BUDGET { TEO 17 ) est toujours 
disponible contre un chèque de 20 francs à l'ordre de TEO. 
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Frogrammé CMUS, th 


LU *+*44%# Programme CMUS.bAS #F4k+ 
2U INSTALLATILUN DU DRIVER LE. 
0 CASSETTES MOS5 PUUR TU/40 on 


peut donc #4 LIRE ET ECRIRE LES 
CASSETTES MOSS SUR FO7 (AVEC LEF 
MOSS) % ECRIRE DES CASSEITES MOSS 


DE 


SUR TO7 (AVEC LEP DE T07) 
45 


50 CLS :MS2r8Hé L2À: ADD: PEEKOMS 2 ) 
#K2SOET+PEEKR(MS2Z+1) :CLEAR. ADD-8&MH30 7/ 
SS ‘le registre BASIC 1.0 
d'adresse MSZ (soit &helzf) 
contient sur 2 octets 1 adresse 
fin de zone des cenaines,. 

60 MS2=&hHe Le: DUBz&HS A4 : 
BADD:FEEK(NS4)*256+ 
PEEKR(MSZ+1 +13: LOADM CMOS .BIN , ADD 
65 on charge la routine binaire 
GMOBDI*ADD+DCB:FOR 1:00 TO Lu STEP 
Zi VIL=PEEKR(ADI+TI)X256+PEEK(EADIL+LT+I 
:VI=VI+ADD:POKE 
AD1+T,INT(VI1/256) :FOKE 

ADIL+E+L, VI-INT(VL/256)#2S6:-NEXT L 
75 on modifie des adresses 
utilisées par cette routine en 
fonction de 

l] adresse d implantation AD 

80 EXEC ADb:PRINT"Peripherique 
CMOS installe” :NEM 

85 on exëcute La routine qui 
crée Un nouveau peripherique CMUS- 
SO END 


QE 


Programme TRANSNR,BAS 


1000 ‘programmme TRANSNR transrert 
de fichiers 
ASCII entre 
cass. MOS5 
1005 

RAA ÉRON ARR A ER OR AR OT KO AE OK fe 
AUIO CLEAR 1 OUU 

LUS CL: PRINT "PRINI 
FICHIERS 2 PRINI:PRINI 
1040 GOSUE L100 UnOLX 

1050 4F D<S IHEN GUSUE 2UUU 
Examen du Ccataloque da une d1:q 
EXtraction des fichiers et 
transtert 

1U6C Î+ D>4 THEN 
Examen d Une Cass 
LU7U L1F C>4 


diSG.NkR et/ou 


[RANSFERI LI 


BOSUH ZSuu) 
EL transtert 
IHEN GUSUE 41ou 
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REPAIRE 


écriture sur cass.fin de bande 
1080 BRINT:PRINT:PKRINT" Irangter £ 
de ‘:;SOURCES:" vers ‘:DESTINS: 
termine” 
10%0 ENL 

LOGS 

RO ŸROR RO RON RCA A AR AE CR AA OX 
109$ 

1100 S/F Choix 
1120 GOSUE 1200 
périphériques 

LI1S0O GOSUB 1500 
ou non 
1140 GOSUB 1400 
transcodage ou non 
L1LSO GOSUB 1500 
sélectit ou non 
L1SO RETURN 
119 

1200 ‘S/F Choix des periphèériaques 
1220 INPUT'unitEe source(Ù a 
Lsunite d1i5a., 5*CMOS)":DE 
1280 D:VAL(EDS 

1240 IF D$="5" I1MEN 
SOURCES "CASS : "ELSE 
SOURCES=DE+ 
1245 IF D>4 THEN 
PRINT:INFUrI Placez 
Position 
LECTURE ,validez 
1250 PRIN: 

L£ei) INPUI'unite destination LO 4 
Jsunité dis... SéCMOS) :CY 

1240 LEVALECHISLF CED THEN 


Choix des 
Choix aftiohage 
Choix 


Yransfert 


Le LEP en 


par <ENlS ".L:PSE 


PRINT Ghoix impossible :GUYU L5GU 
1280 IF Ci= S HN 

DÉSIINSE= "CASS: "ELSE 

DES TINS=US + 

352895 IF C>4 ÏIHEN 
PRINI:INPUI"Flacez le LEr en 
position EMREG. 

Validez par 

<ENT LEP 

1230 RETURN 

12%% 

LSOU 5/P Choix ATTIChAUGE où mon 
LSit FRINI 

19€ INPUT Voulez-vous ati Leher LE 
contenu au rTichier pendant 1€ 


transfertril UUL/U-NONMI 3 Arr IL 


1550 AFFICHE - Ar EF ICH 

LS? KE TURN 

1 SSS 

i 4UL) SP ITANSOOdAGE O1 Mon 
1410 FKRINI 


L4gUu INPFUI"VoulLe” 
LE TLCNLEr. AU 


VOUS Lran:iocoder 
Tormat. Inomson 
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vers le format IBM FC 
(1.Gui/0.Non)";TRANSCODE 


1430 TRANSCODEz=-TRANSCODE 

1490 RETURN 

1499 ‘ 

1500 ’S/F Transfert sélectif ou non 
1510 PRINT 

1520 INPUT'Voulez-vous transfèrer: 


O.TOUS les fichiers, 1.CERTAINS 
fichiers":SELECT 

1580 SELECT=-SELECT 

1590 RETURN 

1599 
2000 
d’une disqa. 

des fichiers 
2010 DIR SOURCES 

2020 PRINT:INPUT'"Nom du fichier à 
transférer (<ENT> pour 

terminer }"3;FICH$ 

2080 IF FICH$<>"" THEN GOSUB S000: 
GOTO 2010 ‘Transfert 

2290 RETURN 

2299 
2400 ‘’S/P Sélection fichier 
à transférer 

2410 PRINT :PRINT 

2420 FRINT'voulez-vous 
": SOURCE S+FICH$ 

PA4SO INPUT'<O> oui / <ENT> 
non"; TRANS 

2440 IF TRANS="0" 
ELSE 

TRANS= 

2490 RETURN 

2499 
2500 


‘S/P Examen du catalogue 
Extraction 


transferer: 


THEN TRANS=- I 


*S/P Examen d'une cass. 


2510 GOSUB 4200 lecture sur 
cass.du nom de fichier 

2520 IF FICH$<>"BANDE.FI1N" THEN IF 
SELECT 

THEN GOSUB 2400 ELSE TRANS:-I 


‘Sélection fichier à transférer 
2580 IF FICH#<>"BANDE.FIN'" THEN IF 
TRANS THEN GOSUB &SO0O00 franstrert 
2540 IF FICHÿ<>"BANDE.FIN' THEN 
GOTO 2510 

2550 ‘Tant que non {t1 de bande): 
lire nom de fichier; 

transférer si fichier sélectionné 
2590 RETURN 

2999 ‘ 

3000 ’5/P Transfert 


SC10 IF C>4 THEN GOSUE 
4100’/écriture sur cass.du nom de 
fichier 

$095 


Si00 
S120 
1830 
SL 
S20Ù0 écho à l'écran début 

transfert d’un fichier 

3210 CLS:PRINT:PRINT 

SOURCE S+FICHS : 

>"; DESTINSE+E ICHS : FRINI 

Transfert en cours...":PRINI ‘ 
8215 : 
3300 ‘lecture & écriture 

3310 LTAMP=255 
SS20 tant que { non fin du 

fichier source): lire Un caractère 

dans ce fichier, placer ce 

caractère dans un tampon, écrire 

le tampon rempli dans le fichier 
destination,l'’afficher 

eventuellement 

3400 L=:O0:LH="" 

5450 IF NOT EOF(1) THEN 
AS=INPUTS#(L,H1):A2ASCCAS ): 
L=LE+AS$:LEL+1 
3460 1F AFFICH 


‘ouverture 
OPEN"I",#1,SOURCES+FICHS 
OPEN"O" ,#2,DESTINS+F LICHS 


THEN GOSUB 4500 


5470 IF ((L<LTAMP) AND (A<>18) AND 
(A<>10) AND (NOT EOF(L))) 

THEN GUTO 4450 

35475 IF TRANSCODE IMEN GUSUE SOOU 
5480 GOSUE 4800 

8490 IF NOT EOFCL) THEN GUIG $40U 
SANS 

SE00 ‘fermeture 

3810 CLOSEKI 

S820 CLOSEHZ 

3900 écho à l'ecran fin 


transfert d'un fichier | 
8910 PRINT:PRINT SOURCES+r LOHS ; 

mms >" 5 DESTINS+E LEHS : PRINT 

transfert terminé” :PKINT 

3990 RETURN 


3999 ‘ | 
4000 ‘S/Fècriture sur cass.fin de | 
bande 

4020 OPEN"O",43.DEST{INS+ NOUM.ExI 

40850 PRINTHS, "BANDE.F 1N”" [l 
4040 CLOUSEHS | 
40%0O RETURN 

4099 | 
4100 ‘’S/P écriture sur cas5s.du non 


de fichier 

4120 OPEN"Q",4HS5,DESTINS+"NOM.EXI" 
4130 PRINIHS,FICH$ 

4140 CLOSEKS 

4150 RETURN 

4199 


4200 ‘S/P lecture sur cass.du nom 
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ae fichier 

4220 OPEN"I",#S3, SOURCES+"NOM.EXT" 
4280 INPUTHS,FICHS$ 

4240 CLOSEXS 

4250 RETURN 

4299 ? 

4500 ’S/P trace écran 

4520 IF 4<S2 THEN PRINI 
"RSSTRSLAIS "le LF ASLSeTHEN 
FRINT 

CHRBCLO)+A$; ELSE IF Àz10 

THEN PRINT A$; 

4580 ‘afficher les sauts de ligne 
(LF code 10) inscrits dans le 
fichier: 

après Un retour chariot (CR code 
15) passer à la 

ligne(Lf )j-pour ne pas empièter sun 
le texte deja affiché 

4540 [IF A>z 82 IHEN PRINF ÀA$: 
4590 RETURN 

459% 

4600  S/9 jiraitement et écriture 
caractères 

4620 [EF D<S THEN PRINI#H2,LS$;:1IF 
Az1LS THEN PRINTH2,CHRS#( LO ); 

:GOTO 4690 

4825 ‘Sur d1isq. TU un fichier 
texte sauvegardé en ASCII 
comporte seulement 

CR(cocde 18) en fin de ligne: on 
raJoutedonc LrF(code 10) 

4680 IF D>4 THEN 
PRINTYH2,LEFIS(LS,L-L)S:IF ((A<>1LS1 
ND (A<>10)) 

THEN PRINTH2,A4$3 ELSE IF A=I10 THEN 
PRINTH2,CHRS(1S):AS;: 

4685 Sur le LEF PRINT# écrivant 
CRicode 1%) entre CHAQUE 

donnée 1insorite, 11 est nécessaire 
de filtrer ces retoursCk en ne 
conservant que ceux 

qui accompagnent le passage a la 
Lignée Lricode 10) 

4690 RETURN 

469$ 

4999 

5000 S/1 Iranscodage IU 
SOLO LLSÉEN(ELS9 

HU20 LT 

5080 K=:O 

509 

5100 K=htl 

SLIU B$S-MIDHELE,K 1} 
5120 E =ASC(ES) 

SIS0 IF 8:22 THEN IF K>=:LL THEN 
GOTG S190 ELSE 


r>IBM PC 


REPAIRE 


K=K+L:CS=MIDS(LS,K,1):C=2ASC(CH):IF 
C<64 THEN GOSUB 5200 ELSE GOSUB 
5400 

5140 LTS=-LTF+6$ 

5150 IF K<LL THEN GOTO 5100 

5160 L$=LrT$ 

5190 RETURN 

5199 ‘ 

5200 ‘S/P transcodage 
caract.speCclaux 

5210 IF C:35 THEN B$S=CHR#(156) 
:GOTO 5350 ’4 

S220 IF C=44 THEN B$S=CHR#(27) 
:GOTO 5390 ‘’fiéche gauche 

S280 IF C=r45 THEN B$S=CHR$S(24) 
:GOTO 5590 ‘flèche haut 

S240 IF C:46 THEN B$S=CHR$S(26) 
:G0OTO 5%90 ’fléche droite 

5250 IF C=47 THEN B$=CHRH(25) 
:GOTO 5390 ’fléche bas 

S260 IF C:48 THEN B$S=CHR$(248) 
CONO SEE | 
5270 IF C=49 THEN B$S=CHR$(241) 
:G0TO 5390 ‘plus/moins 

5280 IF Cz:56 THEN B$=CHR$(246) 
:GOT0 5590 ‘division 

5290 IF C=60 THEN B$=zCHRS(172) 
:GOTO 5$90 ‘1/4 

5300 IF Czél THEN B$=CHR$S(171) 
:GOTO 5390 ’1/2 

58310 IF C=12S THEN BS$S=CHRS (225) 
1COTO, 5396 ! 

5890 RETURN 

539% 

5400 ‘’S/P transcodage 
caract.accentuës 

S410 IF K>=LL THEN GOTO 5490 ELSE 
K=K+1:DB=MIDS(LS,K,1):DzASC(D$) 
5420 IF C=65 THEN GOSUB 5500 :GOTO 
5490 

5430 IF Créé THEN GOSUB 5600 :GOTO 
5490 

5440 IF C=:67 IHEN GUSUB 5700 : GOTO 
54930 

5450 IF C:72 THEN GOSUB 5800 : GOTO 
5450 

5460 IF C=:75 THEN GOSUB 5900 :GOTO 
5490 

S4%30 RETURN 

5493 * 

5500 ‘’S/P acc.grave 

5510 IF D:97 THEN B$=CHRS(138) 
:GOÔTO 5590 ‘à 

5620 IF DLziOL THEN BS$S=CHRS#S(186) 
:G0UTO 5590 ‘é 

5550 IF Dz105 THEN B$S:CHR$#(141) 
:G0TO 5590 ‘1 grave 
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5540 IF D:111 THEN B$S=CHRS(I 14%) 
:GOTO 5590 ‘o grave 

5550 IF D:117 THEN B$=CHRS$I 151) 
:GOTO 5590 ‘ù 

5590 RETURN 

559Q 

5600 ‘S/F acc.aigu 

Sel IF D:97 THEN BS$S=CHR$&I 160) 

:GUOT0 56e30 ‘a aigu 

S620 1F D<I0L THEN BS$=:CHRS$( 150) 
:GO0T0 5690 ‘e 

3630 1F D=105 THEN BS=CHRS(LEL) 
LGOTO 5890 ‘1 aigu 

S640 IF Dzlii THEN B$S=CHRS(LeZ) 
:GUTO 560 oo aigu 

5650 IF D:117 THEN B$S=CHRS(16CS) 
IGOUTO S6S0 OU aigu 

5660 IF DreS THEN E$=CHRS( 144 ) 

:GOTO 5690 ‘ÉË 

S69%0 RETURN 

Se 39 ? 

5700 ‘S/P acc.circonftlexe 

5710 IF D:97 THEN BS$=:CHRS&(1S1 ) 

:6010 5/90 ’a 

S720 1F D:101 THEN BS=CHR$S(136) 
:“GUID 5790 ‘& 

5780 1F D:108 THEN BS=CHRS(140) 
GOTO S790 ‘1 

5740 IF D:111 THEN B$=:CHR$S(147) 
:GUTO 5790 ‘© 

5750 1F bLb:117 IHEN B$S:CHRS$S( 150) 
GOTO SAS Ur °U 

5790 RETURN 

5795 

5600 SG/F trèma 

SS10 IF D:97 THEN B$=CHRS( 182) 

:UOTO 5890 à 

5&20 1F D<1OI THEN BS=CHRSC1S7) 
GOIQ SEC & 

5880 LF D£I05 THEN R$S=2CHRS(1SS) 
1GOTO SES OL 

5840 IF DELIL THEN BE<CHRKS( 148) 
LGOTOMSENES © 

5850 LF Lr117 1HEN B$S=2CHRE( 12%) 
-GOTO SÉS0" "u 

SSeu Lr Dcés MEN BS$=cGMHR#C142) 

:GOTU SESO0 À 

57/0 ÎF Dz7/ THEN B$S=CHRS( 155) 

:GOTO 58€%0 0 

Si) ÊF Dz85S THEN GES=CHRSE L54 ) 

-GOFC SESO “Ù 

5890 RETURN 

SES" 

S900 S,P cédiile 

SYUIO [Fr D:SS THEN B$:CHARS( 1585) 

5390 Ki (tUKRN 

SELLE 


HACK AK XOHKK AH AOK KE OROK HO OK AK OK OK OK DC OK KE DK 


Scene, 10,20: 


locateo,6,8: 
print MAMAN ? 






Mon fils 






Programme TRANSTO.BAS 


1000 ‘programmme TRANSTOS 
transfert automatique de 

fichiers ASCII entre disg.TD et/ou 
cass. T07 ou MO5 

1005 

KA AK OK KKOK DK OKOK KARAOKÉ CE 
1010 CLEAR 1000 

1020 IF PEEK(26)=:96 THEN GOTO 9000 

installation sur TO du 
périphérique CMOS(en Basic 1.0 
seulement) 

1080 CLS :FRINT:FRINT” TRANSFERT DE 
FICHIERS" : PRINT : PRINT 

1040 GOSUB 1100 ” Choix 

1050 IF D<5 THEN GOSUB 2000 
Examen du catalogue d'une d1isqg. 
Extraction des fichiers ASCII et 
transfert 

1060 IF D>4 THEN GOSUB 2500 ” 
Examen d'une cass. et transfert 
1070 IF C>4 THEN GOSUB 4000 
ecriture sur cass.fin de bande 
1080 PRINT :PRINT:PRINT" Transfert 
de ‘’3;SOURCES;" Vers ":;DESTINS; " 
terminé” 

1090 END 

1095 

2 KOKOE OK KR AO AOR OR DR KE OK AAA OR AE 
1CSS 

LiCO ‘5/P Choix 

1120 GOSUB 1200 Choix des 
périphériques 

L150 GOSUB 1300 Choix affichage 
ou non 

1150 GOSUE 1500 Transfert 
sélectif où non 

1190 RETURN 

1199 

1200 ‘S/F Choix des périphériques 
1220 INPUT unité source(O & 
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4runité disq., 5=CMO05, ‘pas 
F<0T07))":DS 2070 
1230 D=VAL(DS) 2080 
1240 IF D$="5" THEN GOTO 
SOURCE S="CMOS:" ELSE IF D$="7" er Le 
THEN SOURCES: "CASS:" ELSE 2090 
SOURCES =DS$+" :" fichi 
1245 IF D>4 THEN 2100 
PRINT:INPUT'Placez le LEF en ELSE 
position F LOPEL 
LECTURE ,validez par 2110 
<ENT>" ,LEPS$ Trans 
1250 PRINT 2200 
1260 INPUT'unité destination (u à 2210 
4=unitée disq., 5=:CMO5, 2290 
20T07)"30$ 2299 
1270 C=VAL(CH):IF C=D THEN 2300 
PRINT"Choix impossible":G0TO 1560 2310 
1260 IF C$z"5" THEN 2520 
DESTINS="COMOS:" ELSE IF C$z"7" 2350 
THEN DESTIN$S="CASS:" ELSE 2S90 
DESTINS=C$+":" 2399 
1285 IF C>4 THEN 2400 
PRINT:INPUT"Placez le LEP en hi 


position ENREG., 
validez par 


<ENT>" ,LEPS$ 3 SOU 
1290 RETURN j +50 
1299 ” nnon’; 
1800 ’S/P Choix affichage ou non MM 2440 






1310 PRINT MELSE 
1320 INPUT"Voulez-vous afficher Lai TRANS 
contenu du fichier pendant le A 2490 
transfert(1.0u1/0.Non)';AFFICH 2499 
1380 AFFICH=-AFFICH M 2500 
1390 RETURN 22510 


1399 PM cass. 
Le Nov FES n + ë. FU + eh 2520 
1500 ‘S/P Transfert sélectif << 
ou non NW SELEC 
1510 PRINT D THEN 
1520 INPUT' Voulez-vous transtérerfl Séêle 
O.TOUS les fichiers, 1,CERTAINS ,fichi 


M 2530 
2 TRANS 
CU THEN 
M 3000 
2540 
GOTO 
2550 


fichiers"; SELECT 

15$50 SELECT:=-SÉLECT 

1590 RETURN 

1599 ‘ 

2000 ‘S/P Examen du catalogue 
d'une d1isq. Extraction des 
fichiers ASCITL 


2010 P=20 ‘Répertoire sur secteursMlire 
3 à 16 de la piste 20 EN trans 
2020 FOR S:S TO 16 D 59 UÛ 
2080 SECTS=:DSKIS(D,F,5) 2999 
2040 FOR I=1 TO 255 STEP 32 $D00 
2050 OCTETIS=MIDS(SECTS, 1,1) 3010 
2060 [EF UCTETIS=CHRS(O) OR 4100 
OCTETIS=CHRS(&HFF) THEN GO10 zzoo fichi 
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de fichier inscrit 
OCTETISSE=MIDHS(SECTS, [+12,1) 
IF OCTETISS<>CHRSC&HEF 3 THEN 
2200 ‘fichier non codé 

CII 

GOSUB 2300 
er 

IF SELECT THEN GOSUB 2400 
TRANS=-1 Sélection 

er à transférer 

IF TRANS THEN GOSUB SOUG 
fert 

NEXT I 

NEXT S 

RETURN 


Lecture nom da un 


*8/P Lecture nom d un fichiei 
NOMS=MIDS(SECTS,1,8&) 
EXIS=:MID#S(SECTÉE,Lté,5) 
FICH$S=NOMS +", "+EXTS 

RETURN 


‘8/P Sélection fichier 
nsfèrer 
PRINT:PRINT 


2420 PRINT'voulez-vous transférer: 


RCED+FICHS 

INPUT'"<O> oui / <ENT> 
TRANS 

IF TRANS="O" THEN TRANSz-L 
= 0 

RE TURN 


‘S/P Examen d'une Cass. 
GOSUB 4200 ? lecture sur 
du nom de fichier 

IF FICH$<> "BANDE FIN" 
" 

GOSUE 
CCLOn 
er à transférer 
IF FICHÿ< 


THEN Ti 


2400 ELSE TRANS:-1 


GOSUE 
Transfert 


1F FICH$S<>"HANDE ,.F INT (THEN 
2510 
‘Tant que non (fin de pande): 


nom de tichier: 
fèrer s1 fichier sSelgctionns 
RETURN 


“SP Transtéert 


IF C>4 I1HEN CUSUR 

BGriiure Sur ca85.du nom de 
er 

a 31 


>'BANDE.FIN" THEN 1FM 


' 














N2532 
N2543 

















N0254 
N0265 
NO29B 
N0043 
NO054 
N2454 
N2465 
N2332 
N2343 
N2398 
N2409 
NO443 
NO454 
NO465 
N0354 
NO365 
NO487 
N0543 
B0032 
B0021 

N2110 
N2121 
NO154 
N0332 
N0343 
NO565 
NO554 
NO576 
NO598 
N0587 
B0010 
B0001 

N0609 
NG610 
B0076 
B0065 
B0100 
B0087 
B0098 









































L’'Evénement 












Les Nouveautés 


LES ATHLÈTES 
LES ATHLÈTES 
LES ATHLÈTES 


AFFAIRE SYDNEY 
AFFAIRE SYDNEY 
AFFAIRE VERA CRUZ 
BIVOUAC 

BIVOUAC 

BOB MORANE CHEVALERIE 
BOB MORANE CHEVALERIE 
BOB MORANE JUNGLE 
BOB MORANE JUNGLE 


BOB MORANE SCIENCE ACTION 
BOB MORANE SCIENCE FICTION 


DIEUX DE LA GLISSE 

DIEUX DE LA GLISSE 

DIEUX DE LA GLISSE 

DIEUX DE LA MER 

DIEUX DE LA MER 
DIEDX-BE-STADE 1 épuisé 
DIEUX DU STADE H 

HMS COBRA 

HMS COBRA 

1ZNOGOUD 

IZNOGOUD 

KARATÉ 

LA MINE AUX DIAMANTS 

LA MINE AUX DIAMANTS 

LES PASSAGERS DU VENT | 
LES PASSAGERS DU VENT 1 
LES PASSAGERS DU VENT | 
LES PASSAGERS DU VENT Il 
LES PASSAGERS DU VENT Ii 
LES RIPOUX 

LES RIPOUX 

MARCHE À L'OMBRE 
MARCHE À L'OMBRE 
MEURTRES EN SÉRIE 
MEURTRES EN SÉRIE 
MEURTRES SUR L'ATLANTIQUE 
MEURTRES SUR L'ATLANTIQUE 
MEURTRES SUR L'ATLANTIQUE 





DU JAMAIS VU 


TO7 = 7 TO7/70 = 7+ TO8 = 8 TO9 = 9 TO9+ = 9+ 





Réfé- 
rence 





Titres 





















N0654 | OK COWBOY 






































149,00i | 
NO0665 | OK COWBOY 199,00F | | 
R1643 | OXPHAR |199,00F | 1 
| K7 |140,00F | 0045 | OXPHAR 149,00F \} 
6 9 94] DK |190,00F | 6732 | PROHIEMON 199,00F } 
NO710 | PROHIBITION 149,00F | 
NO743 | SAPHIR 8 994 DK |199,00F } 
NO721 | SAPHIR 5 67+8 9 K7 |149,00F | 
140,00F | N0798 | SORTILÈGES 9 DK |199,00F , 
140,00F | N0821 | SUPER ANDROÏDES 8 99H DK |199,00F 
190,00F | N0832 | THÈME ASTRAL 9 DK |259,00F | 
NO854 | TNT 8 994) DK |199,00F , 

NO843 | TNT 5 67+8 994 K7 |149,00F 
80930 | TURLOGH LE RODEUR 8 994 ok |246,00F ! 
145,00F | B0929 | TURLOGH LE RODEUR 6 Kk7 |246,00F | 
199,00F | NO876 | VAMPIRE 8 994] pk |199,00F ! 
199,00F | NOB65 | VAMPIRE 149,00F ; 

145,00F - 

19200 Les Educatifs | 
199,00F IL ÉTAIT UNE FOIS 190,00F 
199,00F | C1000 | IL ÉTAIT UNE FOIS 150,00F | 
199,00F SAC À DOS 290,00F | 
199,00F | l 
199,00F ill e 
145,00F US Uti itaires | 
| 














145,00F 
199,00F 
145,00F 





ASSSESAS épuisé 


TO005 | COMMERCE 9 


300,00F 
DK |350,00F 


0 0 © © © 


199,00F TO002 à 9 ñ DK |350,00F 
199,00F TO001 2» 9 ; DK |350,00F 
199,00F LKIT 259,00F 




























249,00F . e ; 
“#7 Affaires exceptionnelles! 
159,00F 

207,00F 1789 6 73,00F 
199,00F 1789 | 748 99% 73,00F 
149,00F AFFAIRE SYDNEY 7+ 99,00F 
199,00F AFFAIRE VERA CRUZ 5 67+8 99% 73,00F ; 
249,00F ASDReiTÉS épuisé 5 7+1éK7+ 73,00F 
249,00F ASSDESASS 5  7+16K7+ K7 | 73,00F 4 
249,00F DIEUX DU STADE 1 5 67+1&K7+ 8| K7 | 73,00F | 
249,00F DIEUX DU STADE 1 5 J+léK7+ | QDD | 99,00F. 
249,00F DIEUX DU STADE 1 5 7+l6K7+ |5"1/4 | 99,00F 
159,00F DIEUX DU STADE Hl 7+8 941 K7 | 73,00F 
116,00F DIEUX DU STADE Il 5 6 K7 | 73,00F 
145,00F DOSSIER BOERHAAVE 7+ 8 994 K7 | 73,00F 
198,00F DOSSIER BOERHAAVE 5 6 K7 | 73,00F 
249,00F DOSSIER BOERHAAVE 74 QDD | 99,00F 
249,00F VE épuisé B 99+| DK | 99,00F 
249,00F ENTROPIE 8 994 K7 | 73,00F 
249,00F ENTROPIE 6 K7 | 73,00F 


249,00F ENTROPIE 8 9 9+| DK 73,00F 








SUR THOMSON 


ATTENTION, stocks limités ! 


Réfé- Réfé- 
rence rence 


R4043 | L'ÉVADÉ DE TAPIOCATRAZ 
N0132 | FOOTBALL 

| NO309 HÉRITAGE II 

N0310 | HÉRITAGE {l 

N0143 | KARATÉ 

NO165 | KARATÉ 

NO176 | KARATÉ 

NO187 | KARATÉ 

N0198 | KIDKIT 

NO209 | KIDKIT 

NO232 | LA GESTE D'ARTILLAC 
NO221 | LA GESTE D'ARTILLAC 
NO243 | LA GESTE D'ARTILLAC 
N0387 | LAS VEGAS 

N0376 | LAS VEGAS 

NO409 | LAS VEGAS 

NO410 | LAS VEGAS 

NO398B | LAS VEGAS 

NO421 | LAS VEGAS 

N0432 | LAS VEGAS 

R1020 | LE MILLIONNAIRE 
N0621 | MANDRAGORE 

N0632 | MANDRAGORE 

NO0643 | MANDRAGORE 

B0043 | MEURTRE À GRANDE VITESSE 
B0112 | MEURTRES SUR L'ATLANTIQUE 





Conditions de vente 


CONDITIONS GÉNÉRALES DE VENTE : 
Disponibilité des articles: Tous les orticles présentés sur le 


catalogue en cours sont disponibles dons la limite des 
stocks. 


Livraisons : 

@ Nos delais sont de l'ordre de 5 jours à réception de la 
commande, sauf problème d'acheminement. 

@ Nos prix sont calculés départ entrepêi. Le transport est 
elfectué en Votre nom par poquet poste non recom- 
mandé. 

POUR ACHETER PAR CORRESPONDANCE : 
Commandes : 

@ Choisissez dans votre cotalogue. 

@indiquez avec précision, sur ce bon de commande, les 
filres, références, quontité et prix. 

@ Ellectuez votre paiement por chéque bancaire, postal 
ou mandat-lettre libellé à l'ordre de MÉDIAVENTURE 
(espèces et timbres-poste rigoureusement interdits), ou 
indiquez votre numéro de Carte Bleue, sa date d'expiro- 
lion el signez 

@ Joignez votre htre de pement à votre bon de com- 
monde (soul Corte Bleue) e1 adressez le tout dans une 
enveloppe 

RENSEIGNEMENTS : 

© Soit par correspondance en écrivant à: MÉDIAVEN- 
TURE 4, impasse des Coquelicots 69675 BRON Cedex, 

© Soit par téléphone de 9 h à 17 h 30 du lundi au vendredi 
en oppelent le 72330339 - Service VPC. 

© 3615 COMIKS. 


Cette offre est réservée aux particuliers et à la France 
Métropolitaine, valable 

des stocks disponibles. 

Prix et frais d'envoi au 31/05/88 susceptibles de variations 
en fonction des circonstances économiques. 

SARL Médiaventure - Capitol de 50 000 F. 

R.C. Lyon B 3341B3 027. 


Bon de commande à retourner à: 


MÉDIAVENTURE 
4 impasse des Caquelicots 
69675 BRON Cedex 

















5 67+ 9 73,00F MEURTRES SUR L'ATLANTIQUE 99,00F 
7+ x 73,00F MINICALC 73,00F 
67+8 9 K7 | 73,00F MISSION DELTA 73,00F 
8 994l DK |149,00F OMÉGA PLANÈTE INVISIBLE 129,00F 
67+8 9 KZ | 99,00F OMÉGA PLANÈTE INVISIBLE 99,00F 
74 QDD | 99,00F OMÉGA PLANÈTE INVISIBLE 99,00F 
74 8 app | 99,00F POLITIK POKER 51,00F 
6 K7 |149,00F ve , à 
7+8 9 | k7 |149,00F Dre A à 
7 } 
ss ; « é + SORTILÈGES 99,00F 
£ ORTILÈGE. 99,00F 
9 DK |129,00F ER 
74 9 K7 | 73,00F 
6 K7 | 73,00F BOBC ; 
QDD | 99,00F OFFRE + LES ATHLÈTES 
7+ QDD | 99,00F e : 
a | ét | ur SPÉCIALE! ||| + MARCHE À L'OMBRE 
LA 1 ——" 
57/4 | 99,00F soit 9 jeux pour 289 4 
7+ 51/4 | 99,00F version cassette 
K7 | 61,00F ou 389F version disquette. 





POUR MIEUX 
CONNAÎTRE 
NOS LOGICIELS 
TAPEZ 










Titres 






















































K7 73,00F 
“ Réfé- 
9 DK |129,00F 


7+ K7 
QDD 




















+ FRAIS DE PORT 


TOTAL À PAYER 





MIEUX VOUS CONNAÎTRE 


@ Avez-vous un minilel& C] non 
© Avez-vous un magnétoscope ? be oui [lnon 
@ Avez-vous un lecteur de disquette ? Coui Ulnon 
Votre âge 
Aimeriez-vous participer à l'une de nos enquêtes 
consommateurs ? Coui [non 


| Si oui, votre numéro de 1éléphone: 2 7 1 _— 


145,00F | S2000 | OFFRE SPÉCIALE 
99,00F | 52001 | OFFRE SPÉCIALE 


289,00F 
TO8, ee +2 = 00F 











RÉN. es es Fe 
PRÉNOM ÂGE: 
ADRESSE, 04 47 1 
VILLE : 
— CODE 





POSTALI LI ER | 


VOTRE MODE DE PAIEMENT 


À LA COMMANDE 
1. [D MANDAT-ETTRE 
3. [1 CHÈQUE BANCAIRE 


ë l'ordre de MÉDIAVENTURE. 


2. O CHÈQUE POSTAL 
4. D CARTE BLEUË 


N'aubliez pas d'inscrire son numéro ef de signer. 
Date d'expiration: 


ET a ES 


N'ENVOYEZ JAMAIS DE MANDAT-CARTE 14 8, DE TIMBRES, NI D'ESPÈCES. 


Signature des parents : 
ATTENTION : une signature folsiliée ou 


imitée peut entroîner des poursultes pénales (Art. 150 ef suivants du Code Pénoi). 


NOM DE VOTRE MACHINE ET MODÈLE 


THOMSON: MOSS [] MOé E  TO7/70 OÙ 
TO8 [ TO9 TO9+ Cl 


Autre, précisez le modèle 





Pour les mineurs, 
signature des parents, obligatoire. 
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REPAIRE 


5095 ‘ 

3100 ‘ouverture 

3120 OPEN"T",HL, SOURCES+FIOHS 
3130 OPEN"O",H#2,DESTINS+FICHS 
S1SS ” 

8200 ‘ écho à l’éoran début 
transfert d’un fichier 

#210 CLS :PRINT:PRINT 
SOURCES+FICHS ; " 

mm >": DESTINS+EICHS : PRINT" 


Transfert en cours...'":PRINT 
Sels ? 
3300 ‘lecture & écriture 


3310 LTAMP=255 
8320 ‘ tant que { 
fichier source): lire Un caractére 
dans ce fichier, placer ce 
caractère dans un tampon, écrire lé 
tampon rempli dans le fichier 
destination,l'afficher 
éventuellement 

5400 LrO:Lgz"" 

3450 IF NOT EOF(1) THEN 
AS=INPUTSCL,HL):A=ASCCAS): 
LE:LE+AS:ILEL+I 

3460 IF AFFICH THEN GOSUE 4500 
8470 IF ((L<LTAMP) AND (A<>13) AN 
(A<>10) AND (NOT EOF(1))) 

THEN GOTO $450 

8480 IF TRANSCODE THEN GOSUB 4706 
$#490 GOSUB 4600 

IF NOT EOF(1) THEN GOTO $400 


non Tim du 


8595 
3400 
810 
3820 CLOSEH?2 

3300 ?’ écho & l'écran fin 
transfert d’un fichier 

3910 PRINT:PRINT SOURCES+FICHS : " 


‘fermeture 


De-> US DESTIMSEHETCHSE: PRINT" 


.Transferc 


| 4080 
… 4040 


terminé ":PRINT 

8990 RETURN 

999 * 

4000 ‘S/Pécriture sur cass.fin de 
bande 
4020 OPEN"O",#3,DESTINS+"NOM.EXT" 
PRINTHS, "BANDE.F TN" 

CLOSEHS 

4090 RETURN 
4099 
4100 ‘S/P écriture sur cass.du no 
de fichier 

4120 OPEN"O",H#3,DESTINS+'NOM.EXT" 
41850 FRINTHS,FICHSE 

4140 CLOSERS 

4150 RETURN 

4199 


34 


CLOSEHI | 


4200 ‘S/P lecture 
de fichier 

4220 OPEN'"T'"',HS, SOURCES+'NOM, EXT" 
4280 INPUTHS,FICHS 

4240 CLOSEHS 

4250 RETURN 

4299 ‘ 
4500 ’S/P trace écran 
4520 IF A<32 THEN PRINT 
IP sSTASTATIE NU] ee CTROATLS 
PRINT 

CHRSÇLO)+TAS: ELSE IF AZ10 
THEN PRINT A4$; 


sur Oass.du nom 


THEN 


4530 ‘afficher les sauts de ligne 
(LF code 10) inscrits dans 1e 
fichier ; 


aprés un retour chariot (CR code 
15) passer à& 1a 
ligne(LF) pour ne pas 


le texte déjà affiche 


empieter sur 


4540 IF A>z 32 THEN PRINT 45; 
4590 RETURN 

4599 

4600 ’3/P Traitement et écricure 


caractères 

4620 IF D<5 THEN PRINTK2,LS$::IF 
8:13 THEN PRINTHZ,CHRS(10);: 
:GOTO 46890 

4825 ‘Sur disq. TO un fichier 
texte sauvegardé en ASCII 
oomporte seulement 

CR(code 15} en fin de ligne: 
rajJoutedonc LF(code 10) 

46S0 IF D>4 THEN 
PRINTHL,LERTECLS,LeLISETr (CAS I5A 
AND (A<>10)) 

THEN PRINTH2.48$; ELSE LF Hz10 
PRINTH2,CHR$( 15): AS; 

4835 ‘Sur le LEP PRINTH écrivant 
CRicode 1%) entre CHAQUE 

donnée insorite, 11 gst nécessair: 
de filtrer ces retoursCk en ne 
conservant que ceux 

qui accompagnent le passage àä 14 
ligne LF(code 10) 

46930 RETURN 


on 


THEN 


4699 ÿ 
4999 ? 
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9000 ‘ appel routine binaire 
CMO5.BIN 

9020 ’ INSTALLATION DU DRIVER DE 
90SO ? CASSETTES MO5 POUR TO7 
9040 * on peut donc * LIRE ET 
ECRIRE DES 

CASSETTES MOS5 SUR TO7 (AVEC LEP DE 
MOSS) * ECRIRE 

DES CASSETTES 

MOS SUR TO7 (AVEC LEP DE T07) 
9045 ‘ 

9050 MSZ:8&H612AÀ:ADD:PEEK(MSZ )4x256+ 
PEEK(MSZ+L):CLEAR 1000,ADD-&H307 
905$ ‘le registre BASIC L.0 
d'adresse MSZ7 (soit &H612A) 
contient 

sur 2 octets l'adresse de fin de 
zone des chaines. 

9060 

MSZ2&RHE 12A : DOB=8RHSA4: ADD=PEEK(MSZ) 
KX256+PEEK(MSZ+1)+1: 
LOADM"CMOS5.8IN",ADD 

9065 ” on charge la routine 
binaire CMOS 

9070 ADI=ADD+DCB:FOR I=:0 TO 10 
STEr 2: 
VI=PEEK(ADI+I)X256+PEEK(ADI+I+1): 
VI=VI+ADD:POKE ADI+I,INT(V1/256 ): 
POKE 
ADITEI+L,VI-INT(VI1/256)*X256:NEXT I 
9075 ‘ on modifie des adresses 
utilisées par cette routine en 
fonction de l'adresse 

d implantation ADD 

9080 EXEC ADD:PRINT'"Périphérique 
CMOS installé":PRINT 

9090 GOTO 1030 

9095 

END © #4 k 2 OK OK OK OK KO OK OKC COR OK OK OK DK 


REPAIRE 


ADRESSES UTILES 


SAGEM: 1, rue Louis Meunier 

Parc de la defense 

BP 215 92000 NANTERRE CEDEX 
tel : (1) 42.91.2407 


LA TELEMATHEQUE: 2 rue Nicolas Leblanc 
59000 LILLE 
tel : 20.40.14.38 


Editions CEDIC NATHAN 
6,10 Boulevard Jourdan 
75014 PARIS 


«TROIS-QUART FACE»:39,rue Benoist Mary 
69005 LYON 
tel : 78.36.29.76 


STEAM TURBO :garage CANOVAS 
Amberieux d'Azergues 

69480 ANSE 

tel : 74.67.05.84 


PRODIST-ACTION :10,rue Mederic 
75017 PARIS 
tel : 16.(1).42.67.40.88 


COBRA SOFT :32,rue de la Paix . BP 115 
71100 CHALON SUR SAONE 
tel : 85.93.20.01 


ICIMARQUES :tapez 36.29.36.30 


LORICIEL :81,rue de la Procession 
92500 RUEIL MALMAISON 
tel : 47.52.11.33 


STEAM TURBO (diffusion) 

EURO Puissance Diffusion :2,place Ampere 
69650 St GERMAIN AU Mt D'OR 

tel : 78.91.39.69 


HORIZON PME :5,rue des Entrepots 
69004 LYON 
tel : 78.68.88.27 


THOMSON :19,Avenue Dubonnet . B.P 25 
92403 COURBEVOIE CEDEX 
tel: 47.88.51.33 


CL vom om om om mom oo om om oo eo mn ou mm 


TEO annonces 


Pour rédiger votre annonces, utilisez ce bon; écrivez très lisiblement en majuscules. 


NOM: Prénom: 
Adresse : 


Texte : 








Coupon à retourner 


correctement rempli à 
l'adresse suivante : 
TEO 
84, rue du îer Mars 1943 
69628 VILLEURBANNE CEDEX 
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REPAIRE 


@THELLO 


Un grand classique du jeu sur échiquier, alliant réflexion et stratégie. Au départ, un damier de 8 x 8 en trois dimensions, 
puis, après avoir pris connaissance des règles, vous choisissez votre couleur (noir ou blanc) et vous voilà embarqué dans 
un duel d'environ 40 minutes contre votre ordinateur, Votre but est curieusement le même que celui de votre TO : 
gagner. Le moyen : il suffit de prendre en «tenaille» un pion adverse pour qu'il soit retourné et change ainsi de couleur. 
Le jeu s'arrête soit lorsque l’échiquier est plein, soit lorsque la situation est bloquée. 

Avec ce jeu, vous vous apercevez que votre ordinateur est un être réfléchi (parfois même un peu trop) : environ 40 secondes 


avant de jouer ! 





5 CLEAR 5000 :DIMT%(5000): 
DIMNU(99),VL(99), 
DR(8),AN(99) ,VR(99) 
6 CO=15/16:BASz=170:DAM=2 
10 PALETTE 0,541: PALETTE1,1245 
: PALETTEZ2,0: PALETTE3, 4095 
30 CONSOLEO,24: CLS: CONSOLE,,,,2: 
ON DAM GOSUB 30000,30100 
39 LOCATE,,0: 
GET(0,0)-(39,24),T%(5000): 
LOCATE17,12: COLOR2,0: ATTRBO,1: 
PRINT"'OTHELLO": LOCATEO,24: 
ATTRBO,0: PRINT'"'(c) DRG88";: 
LOCATES,22: COLOR, 3: 
PRINT'"'VOULEZ-VOUS LES REGLES ?" 
40 A$=INPUTS(1): IF A$="N" OR 
A$='"n" THEN 1000 
41 GOTO 600 
49 ?TOUR 
50 L1=30*((CO)"(X-1)): 
X1=159+(Y-5)*xLi: L2=L1*CO: 
Y1=BAS-(X-1)#L1: X2=159+(Y-5})*xL2: 


Joël DRIGO 


Y2=BAS-X*XL2 

60 RETURN 

69 CASE 

70 CXI1=Y2-Y1: DTI1=X1#CXI1: 
DTI2=-X2#CXI1 :CYI1=X2+L2-X1 
:CY11=-CYI1 :TI1=DTI1+Y14CYI1 
:CXI2=X1+L1-X2 :CXI2=-CXI12 
:TI2=DTI2+Y2XCXI2 

80 DET=CXI1*x(CXI12+CY11) 

90 SUP1=TI1#CXI2-TI2%XCYII1 

: SUP2=CXI1#TIZ2+CXI1XTI1 

100 XBI1=SUP1/DET :YB1=SUP2/DET 
110 RETURN 

120 LINE(X1,Y1)-(X1+L1,Y1),COL 
:LINE-(X2+L2,Y2),COL 
:LINE-(X2,Y2),COL 
:LINE-(X1,Y1),COL 

130 RETURN 

139 ?’PIONS 

140 RH=10#((CO)"(X-1)) :RV=RHXCO 
: RETURN 

149 BASE 

150 CIRCLEF(XP,YP)RH,RV,COL :RETURN 
159 ?DAMES 

160 GOSUB140 :GOSUB 50 :GOSUB 70 
:XP=XB1 :YP=YB1 

170 IF -(X MOD 2) THEN ZK1=1 ELSE 
ZK1=0 

180 IF -(Y MOD 2) THEN ZK2z1 ELSE 
ZK2=0 

190 CL=0 :ZK=-1*XABS(ZK2-ZK1) :IF 
ZK AND COL=3 THEN CL=2 ELSE IF 
NOT ZK AND COL=2 THEN CL=3 

195 IF CL<>0 THEN SWAP CL,COL 
:GOSUB 150 :SWAP CL,COL ELSE 
GOSUB 150 

200 FOR YP=YB1-1 TO YB1-2 STEP -1 
:GOSUB 150 :NEXT YP 
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:CIRCLE(XP,YP)RH,RV,5-COL :RETURN 

209 ’OTHELLO/REVERSI 

210 GOSUB140 :GOSUB 50 :GOSUB70 
:COL=5-COL 

220 XP=XB1 :YP=YB1 :GOSUB 150 
:YP=YP-1 :GOSUB150 :COL=5-COL 
:YP=YP-1 :GOSUB150 :YP=Yp-1 
:GOSUB150 
:CIRCLE(XP,YP)RH,RV,5-COL;:0,3,.14159 
: RETURN 

229 ?’POINTE CASE 

230 GOSUB 50 :GOTO 120 

239 ?’REGENERE CASE 

240 XL=X :YL=Y 

250 CS=10XxY+X :IF NU(CS)=0 THEN 266 

260 COL=4-NU(CS) :GOSUB 210 :X=Xx-1 
:IF X<1 THEN 270 

265 GOTO 250 

266 IF X=XL THEN X=X-1 :IF X>0 
THEN 250 

270 RETURN 

300 FOR Y=1 TO 8 

305 CHG=0 

310 FOR X=8 TO 1 STEP -1 

315 CS=10XY+X IF AN(CS) THEN 
CHG=-1 

320 IF X<=4 AND NU(CS)=0 THEN CHG=0 

325 IF NU(CS)=0 THEN CHG=0 ELSE IF 
CHG THEN COL=4-NU(CS) :GOSUB 210 

330 AN(CS)=0 :NEXTX,Y 

340 IF NU(11)=M THEN VL(12)=12 :1F 
NU(21)=M OR NU(12)=M THEN 
VL(22)=10 ELSE IF NU(22)=J THEN 
VL(33)=15 

341 IF NU(18)=M THEN VL(17)=12 :1F 
NU(17)=M OR NU(28)=M THEN 
VL(27)=10 ELSE IF NU(27)=9J THEN 
VL(36)=15 

342 IF NU(88)=M THEN VL(87)=12 :IF 
NU(87)=M OR NU(78)=M THEN 
VL(77)=10 ELSE IF NU(77)=9J THEN 
VL(66)=15 

343 IF NU(81)=-M THEN VL(82)=12 :IF 
NU(82)=M OR NU(71)=M THEN 
VL(72)=10 ELSE IF NU(72)=J THEN 
VL(63)=15 

344 RETURN 

400 X=L :Y=C :GOSUB140 :GOSUB 50 
:GOSUB 70 :XP=XB1 :YP=YB1 

410 FOR YP=YB1 TO YB1-2 STEP -1 
:GOSUB 150 :NEXT YP 
:CIRCLE(XP,YP)RH,RV,3 

420 X=L :Y=C 

430 CS=10*Y+X :IF NU(CS)=0 THEN 460 

435 IF X=L THEN 460 

439 COL=4-NU(CS) :IF AN(CS) THEN 
COL=5-COL 

440 GOSUB 210 :X=X-1 :IF X<1 THEN 
470 

450 GOTO 430 

460 IF X=L THEN X=X-1 :IF X>0 THEN 
430 


REPAIRE 


470 RETURN 

472 ? Pour Modifier L'Algorithme 
473 ’De Réflexion De L'Ordinateur : 
474 ? 


475 ? Modifiez Les Lignes 500 à 599 
476 ? 
477 * Pour Compter Les Pions Pris 


478 ? CS=éNUMERO CASEè :SF=-1 
:GOSUB 1700 
479 ? Récupération Dans S 


480 ? 

481 * Dans VR( ) Simulation Du Coup 
482 ?’ Si CM=-1 ( LIGNE 1775 }) 

483: ! 

484 ? Dans AN() Indication D'une 
pièce changée Si = -1 

485 

486 ’ A Vous De Donner Du Génie A 
Votre TO 


500 FOR ZI=0 TO 99 :VR(ZI)=NU(ZI) 
:‘AN(ZI)=0 :NEXT ZI : PREPARATION 
DU DAMIER POUR SIMULATION 

501 SSV=S :SF=-1 :CM=-1 :GOSUB1700 
: SIMULATION AVEC SAUVEGARDE DE 5 
DANS SSV 

502 KH=0 :MEMCS=CS :NSS=S 
: SAUVEGARDE DU NOMBRE DE PIONS 
JOUEURS PRIS 

503 FOR SICS=11 TO 88 :IF 
VR(SICS)<>J THEN 508 :’SI LA CASE 
NE CONTIENT PAS UN PION JOUEUR 

504 SF=-1 :CM=0 :SAN=0 
:?’CONTIENDRA -1 SI UN DES PIONS 
PRIS SERVIRA DE TREMPLEIN A UNE 
PRISE JOUEUR 

505 CS=SICS :GOSUB 1700 :IF SAN=0 
THEN508 :’SI PAS DE TREMPLIN 
ALORS CONTINUE 

506 ? SINON .... 

507 IF S>(NSS*x2+5) THEN KH=-1 :”? 
SI PIONS PRIS PAR ADVERSAIRE 
SUPERIEUR A PRISEXx2+5 - ON PEUT 
CHANGER POUR MODIFIER LA 
REACTION- ALORS PAS FAIRE LE 
COUPS (KH=-1) 

508 NEXT SICS : S=SSV :CS=MEMCS 

599 RETURN 

600 COLOR3,0 :CLS :PRINT'"'Le jeu se 
déroule sur un damier 8 x 8." 

610 PRINT'Les pions utilisés sont 
bicolores noirs d’un côté, 
blancs de l’autre." 

620 PRINT"'L’un des deux joueurs 
posera des pions côté 
noir,l'autre côté blanc." 

630 PRINT'"'A son tour un joueur 
doit poser un pion à sa couleur 
prenant en tenaille avec l’un de 
ses pions adverses.Ces pions sont 
retournés." 

640 PRINT"'Si un joueur ne peut 
retourner de pions adverses,il 
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REPAIRE 


passe son tour." :GET(13,12)-(27,20),T%X(IM) 
650 PRINT'Quand le damier est :BOXF(13,12)-(27,20)127,2 
plein,ou quand aucunjoueur ne :BOX(104,96)-(223,167),3 
peut plus jouer,le gagnant est :COLORO,2 :LOCATE14,13 
celui qui poss*Aedent le plus de :PRINT"VOULEZ-VOUS"; :LOCATE14,15 
pions à su couleur." :PRINT"'LES NOIRS"; :LOCATE14,19 
660 PRINT"APPUYER UNE TOUCHE POUR :PRINT"LES BLANCS" :LOCATE19,17 
JOUER" :PRINT"OU" :A$="x*x," :CP=1 
670 A$S=INPUT$(1) :CLS :GOTO1000 1210 HX=19-(CP-1)*x4 :LOCATE 26,HX 
800 ON COM GOTO : PRINTAS$ 
802,803,804,805,806,807,808,809 1220 COM=STICK(0O) :IF COM=0 THEN 
801 GOTO820 COM=STICK(1) :IF COM-=0 THEN1240 
802 XD=XD+1 :GOTO 810 1230 IF (COM=1 AND CP=1) OR (COM=5 
803 XD=XD+1 :YD=YD+1 :GOTO 810 AND CP=2) THEN LOCATEZ26 ,HX 
804 YD=YD+1 :GOTO810 :PRINT" “; :CP=3-CP 
805 YD=YD+1 :XD=XD-1 :GOTO810 1240 BT =STRIG(O) OR STRIG(1) :IF 
806 XD=XD-1 :GOTO810 BT THEN 1260 
807 YD=YD-1 :XD=XD-1 :GOTO810 1250 GOTO1210 
808 YD=YD-1 :GOTO810 1260 PUT(13,12),T%(1IM) 
809 XD=XD+1 :YD=YD-1 1270 M=NR :J=BL :IF CP=1 THEN SWAP 
810 IF XD<1 OR XD>8 OR YD<1 OR M,J :COL=3 ELSE COL=2 
YD>8 THEN XD=XG :YD=YG 1275 CIRCLEF(280,10)7,7,COL 
820 RETURN :CIRCLE(280,10)7,7,5-COL 
998 END : LOCATE18,1 :COLOR5-COL, COL 
999 ’JEU :PRINT"VOUS AVEZ LES" 
1000 CONSOLEO , 24 1280 IF J=NR THEN 1310 
1010 CLS :’INIT 1290 GOSUB 1570 :GOSUB 300 
1020 PUT(0,0),TX%X(5000) 1300 IF PS=2 OR PJ=0 OR T=61 THEN 
1030 NR=1 :BL=2 :VD=0 :CB=-1 1330 
1040 FOR I=0 TO 99 :NU(I)=VD :NEXT 1310 GOSUB1380 :IF NOT VPAS THEN 
I COL=0 :GOSUB 400 :GOSUB 300 ELSE 
1050 FOR I=0 TO 9 :NU(I)=CB GOSUB 300 
:NU(10*x1)=CB :NU(10*I+9)=CB 1320 IF PS<2 AND PO>0 AND T<61 
:NU(90+I1)=CB :NEXT I THEN 1290 
1055 NU(44):BL :NU(55)=BL 1330 LOCATEO,23 :COLOR2,0 
:NU(45)=NR :NU(54)=NR : PRINT"VOUS AVEZ";PJ;"PIONS, ” 
1060 PO=2 :PJ=2 :PS=0 :T=1 1340 LOCATE 20,23 
1070 FOR I=1 TO 8 :READ DR(I) : PRINT"J’'AI";PO;"PIONS."; 
:NEXT I 1350 IF PJ>PO THEN COLOR2,0 
1080 DATA -1,-11,-10,-9,1,11,10,9 :ATTRB1,1 :LOCATEZ2,5 :PRINT'"VOUS 
1090 FOR I=1 TO 99 :READVL(I) AVEZ GAGNE !" :GOTO 5000 
:NEXT I 1360 IF PJ<PO THEN COLOR2,0 
1100 DATAO,0,0,0,0,0,0,0,0,0 :ATTRB1,1 :LOCATES,5 :PRINT'"J'AI 
1110 DATAO,40,3,15,10,10,15,3,40,0 GAGNE !" :GOTO 5000 
1120 DATAO,3,0,9,12,12,9,0,3,0 1370 LOCATE 8,5 :ATTRBO, 1 
1130 DATAO,15,9,11,15,15,11,9,15,0 :COLOR3,2 :PRINT"'NOUS SOMMES 
1140 EX-AEQUOS !" :GOTO 5000 
DATAO,10,12,15,18,18,15,12,10,0 1380 AD=M :TR=J 
1150 1390 LOCATE 2,23 :COLOR2,0 
DATAO,10,12,15,18,18,15,12,10,0 :PRINT®A VOUS DE JOUER" :XG=1 
1160 DATAO,15,9,11,15,15,11,9,15,0 :YG=1 :COL=0 :X=XG :Y=YG :GOSUB 
1170 DATAO,3,0,9,12,12,9,0,3,0 230 :GOSUB240 
1180 DATAO,40,3,15,10,10,15,3,40,0 1400 COM=STICK(O) :BT=STRIG(0) OR 
1190 DATAO,0,0,0,0,0,0,0,0,0 STRIG(1) :IF COM=0 THEN 
1195 FOR Y=1 TO 8 :FOR X=8 TO 1 COM=STICK(1) 
STEP -1 :IF NU(10X*xY+X)<>0 THEN 1401 IF COM=0 AND BT THEN 1450 
COL=4-NU(10*Y+X) :GOSUB 210 1408 BE=INEEFS LE BSer" OR 
1196 NEXT X,Y :BOXF(0,0)-(55,23),1 RS$="p" THEN 1441 
:BOX(0,0)-(55,23),2 :LOCATEI1, 1 1410 IF COM=0 THEN 1400 
: ATTRBO , 0 :COLORO, 1 :PRINT'"P";: 1420 XD=XG : YD=YG : GOSUB 800 :1F 
:COLORZ ,1 :PRINT"ASSE" YD=YG AND XG=XD THEN 1400 
1200 IM=T%X(5000) 1430 COL=2 :X=XG :Y=YG :GOSUB 230 
38 
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:GOSUB240 :X=XD :Y=YD :COL=0 
:GOSUB230 :GOSUB240 :XG=XD :YG=YD 
1440 GOTO 1400 

1441 X=XG :Y=YG :COL=2 :GOSUB 230 
:GOSUB 240 :VPAS=-1 :GOTO1520 
1450 CS=10XYG+XG :IF NU (CS)<>0 
THEN PLAY'"L24DOL3DOREDOFA" 
:GOTO1400 

1455 COL=2 :X=XG :Y=YG :GOSUB 230 
: GOSUB240 

1460 C=YG :L=XG :CS=10XxC+L :1F 
NU(CS)C>VD THEN 
PLAY"L24SOL5REFALA'" :COL=0 :X=XG 
:Y=YG :GOSUB 230 :GOSUB240 :GOTO 
1400 

1470 SF=-1 :GOSUB1700 

1480 IF S=0 THEN 
PLAY"L24SOL5REFALA" :COL=0 :X=XG 
:Y=YG :GOSUB 230 :GOSUB 240 
:GOTO1400 

1490 SF=1 :GOSUB 1700 

1500 PJ=PJ+S+1 :PO=PO-S :T=T+1 
:PS=0 

1510 RETURN 

1520 FOR CS=11 TO 88 

1530 IF NU(CS)<>VD THEN S=0 :GOTO 
1550 

1540 SF=-1 :GOSUB 1700 

1550 IF S=0 THEN NEXT CS :PS=PS+1 
: RETURN 

1560 PLAY"L24D0" :LOCATE 12,23 
:COLORO,3 :VPAS=0 :PRINT"'VOUS NE 


POUVEZ PAS PASSER !" :GOTO01390 
1565 ’ * REFLEX COMPUT UNTIL NEXT 
RETURN !! 


1570 AD=J :TR=M :B=-100 
:BOXF(0,182)-(319,199),0 

: LOCATE2,23 :COLOR 2,0 :PRINT'"'A 
MOI DE JOUER" :DBF=-1 

1580 FOR CS=1i TO 88 

1580 IF NU(CS)<>VD THEN1650 

1600 SF=-1 :GOSUB 1700 

1610 IF S=0 THEN1650 

1620 SC=VL(CS)-S :IF T>18 THEN 
SC=SC+2*xS :IF PO<PJ-10 THEN 
SC=SC-2*XS :SC=8C+2"S 

1621 IF T<19 THEN IF PJ-PO)>PO THEN 
SC=SC+2*S 

1622 KH=0O :IF DBF THEN GOSUB 500 
:IF KH AND SC<14 THEN SC=-100 

1630 IF SC<=B THEN 1650 

1640 B=SC :MC=CS 

1650 NEXT CS 

1655 IF DBF AND B=-100 THEN DBF=0 
:GOTO01580 

1660 IF B=-100 THEN LOCATE17,23 
:PRINT"'JE PASSE !" 

: PLAY''L48DOREDOFAL24DOREFA" 
:BOXF(0,182)-(319,199),0 :PS=PS+1 
: RETURN 

1670 FOR ZI=0T099 :AN(ZI)=0 
:NEXTZI :C=INT(MC/10) :L=MC-10xcC 
: PLAY "L48O05DOL120O4RE" :COL=0 
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: GOSUB400 
11680 SF=1 :CS=MC :GOSUB1700 
1690 PO=PO+S+iI :PJ=PJ-S :PS=0 
:T=T+1 :BOXF(0,182)-(319,199),0 
: RETURN 
1700 S=0 :FOR K=i TO 8 
1710 D=DR(K) :CC=CS+D :81=0 
1720 IF NU(CC)<>AD THEN1780 
1725 IF AN(CC)=-1 THEN SAN=-1 
1730 S1=S1+1 :CC=CC+D 
1740 IF NU(CC)=AD THEN 1730 
1750 IF NU(CC)C>TR THEN1780 
1760 S=-S+S1 


1770 IF SF=1 THEN CC=CS :FOR K1=0 


TO Si :NU(CC)=TR :AN(CC)=-1 
:CC=CC+D :NEXT Ki 


1772 IF SF=-1 AND CM=0 THEN CC=CS 
:FORK1=0OTOS1 :AN(CC)=-1 :CC2CC+D 


: NEXTK1 


1775 IF CM THEN CC=CS :FOR K1=0 TO 
Si :VR(CC)=TR :AN(CC)}=-1 :CC=CC+D 


:NEXT KI 
1780 NEXTK :RETURN 
5000 ATTRBO,0 :A$=INPUT$(1) 


:CONSOLEO, 24 :CLS :RUN"AUTO.BAT" 


29999 ? DAMIER 
30000 FOR X=1 TO 8 :FOR Y=i TO 8 


30010 GOSUB 50 :IF -(X MOD 2) THEN 


ZK1=1 ELSE ZK1=0 

30020 IF -(Y MOD 2) THEN ZK2=1 
ELSE ZK2=0 

30030 ZK=ABS(ZK2-ZK1) :COL=2-ZK 
30040 GOSUB 120 :GOSUB70 
:PAINT(XB1,YB1),COL 

30050 NEXT Y,X 

30060 xX=1 
:BOXF(39,BAS)-(279,BAS+7),1 
:FORY= 1 TO 8 

30070 GOSUB50 :IF -(Y MOD 2) 
BOXF(X1,BAS)-(X1+L1-1,BAS+4 
ELSE LINE(X1,BAS+4) 
-(X1+L1,BAS+4),2 
:LINE(X1+1,BAS)-(X1+L1-1,BA£ 

30080 NEXT Y 

30090 RETURN 

30099 ?’AIRE DE JEU 

30100 FOR X=1 TO 8 :FOR Y=il T 

30110 GOSUB50 :COL=2 :GOSUB 1 
:COL=1 :GOSUB70 
:PAINT(XB1,YB1),COL 

30120 NEXT Y,X 

30130 X=1 
:BOXF(39,BAS)-(279,BAS+7),1 
:FORY= 1 TO 8 

30140 GOSUB50 :LINE(X1,BAS+4} 
-(Xi+L1,BAS+4),2 
:LINE-(X1+L1,BAS+1),2 


:LINE(X1+1,BAS)-(X1+L1-1,BAS)AS+1),2 


:LINE(X1+1,BAS)-(X1+L1-1,BAS),2 
30150 NEXT Y 

:LINE(39,BAS+1)-(39,BAS+4),2 
30160 RETURN 
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LÉ MENU DÉROULANT 


(3 


DE MAX 


Apre; le cours ( Basic Fonctionnel), voici 
l'exemple. Le menu déroulant est une option qui 
permet de faire des choix. Facilement en connais- 
sant la liste des options. Mais sans perdre 
l'information contenue sur l’écran. Presque tous 
les bons logiciel l’utilisent. 

Pourquoi pas les vôtres ? 


Le programme propose une procédure de menu 
déroulant qui peut être placé à l'Intérieur de n'importe quél 
programme (entre 9900 et 9999). 


Pour l'appeler, il faut avoir rempli les variables 
suivantes ! 


NMENU le nombre de ligne du menu (maximum 
10), 
MENUS un titre court pour le menu, 


MENUS(1) à MENUS$(NMENU) 
les options du menu ; elles doivent 
commencer par une lettre majuscule 
unique puisque cette lettre caracté- 
rise l'option. 


Pour afficher le menu n'importe où sur l'écran, il suffit 
de modifier XMEN et YMEN (coin haut gauche du menu). 
Leur valeur nulle affiche le menu en haut à gauche de 
l'écran. LMEN est la largeur du menu, au maximum 14 
caractères. 


Les variables locales du menu, outre celles déjà indi- 
quées, se terminent par M pour ne pas entrer en collision 
avec les varibles du programme : 


XOM, YOM position du curseur hors menu, 

XM, YM le coin bas droit du menu, 

VM, WM les coordonnées de la souris ou du 
crayon, 





CHOIX CM n° de la ligne cholsie ou ancienne à 
inversée, 

AM$ pour vider le clavier, 

SOURIS pour savoir si la souris est utilisée 
(ou le crayon), 

MENUDEJA _ pour réserver le tableau d'Image, 


si ce n'est déjà fait. 


Pour que l’utilisation des flèches soit compatible avec 
la souris, dans le menu, il est nécessaire dans l'emploi de 
la souris de maintenir le click gauche enfoncé (correspon- 
dant à la pression sur le crayon). 

N'est-il pas irritant de ne pouvoir utiliser qué la souris 
dans certains logiciels ? 


Remarque : dans le programme, les «?» correspon- 
dent à «print». 


Max HAGENBURGER 
10 CLS:? ‘''Le MENU DEROULANT de 
MAX'': xm=27: gosub 9999 
20 ? " choix : -Îère lettre" 
50 -flèches+ENT" 
GO ,.? M -souris, click! : 
à -gauche enfoncé" 
50 A1 äbandon: ent{'"" : ? 
box(U,0)-(208,50) 
60 do 


10 ? “Fl=menu chnt{=fin :"::11$-= 
chr$(144) 

80 a$=input$(1): if a$=f1$ then 
gosub IU0 else print aÿ 

90 if a$<>chr$(27) then loop 

99 end ‘---------------- 
100 menu$=''menu:'"" ‘exemple d'appel 
110 nmenu=4: restore 120: ftor i=1 
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to nmenu: read menu$(i)j: next 
120 data 

Afficher ,Entrer Modifier, 
Sélectionner 

130 gosub 9900 

140 affic=(choix$="'A'"'): if affic 
then ? ‘Afficher’ 

150 entre=(choix$='"'E"): if entre 
then ? ‘Entrer 
160 modif=(choix$='""M"): if modif 
then ? “Modifier 

170 selec=(choix$="S"): if selec 
then ? ‘'Sélectionner 


180 if aban then ? ‘'aban' 
190 return 

9900'menu$, menu$(),nmenu=> 
choix$,aban 

9901 xmen=5: 
menu 

9905 xom=pos(0): yom=csrlin: if 
not menudeja then menudeja=-1: 
dim menu%(800) 

9910 Imen=14: for cm=1 to nmenu: 
Imen=max(lmen,len(menu$(cm)):next 

9915 xm=xmen+lmen+1: 
ym=ymentnmenu+i: get(xmen,ymen)- 
(xm,ym) ,menu%(800): Iiocate 
xmen,vmen,0: boxf(xmen,ymen)- 

( xm ; vm ) to nt 

9920 box(xmen*8+2,vmen*8+7)- 
(xm*8+3,vm*8+3): 
line(xmen*8+4,ym*8+4)- 
(xm*8+4,ym*8+4): line- 
(xm*8+4,ymen*8+10) 


ymen=0 ‘coordonnées 


9925 for cm=1 to nmenu: locate 
xmen+ti,ymentcm: ? using ''&''; 
menu$(cm): next: locate 
xment+i,ymen,i: ? menu$;: locate 


xm-8: ? "ab=cent[";: plav 'lidosi'# 
anm$=inkeys 

9930 console, ,4: 
box£(xmen*8+8 ,ymen*8+8 )- 


(xmen*8+15,vym#8-1): console, ,0: 


choix=1 
9935 do: cm=choix: gosub 9999 
9940 do: choix$=inkev$: 


Sour1is=ptrig: if choix$=''"and not 
souris then loop 

J945 play "“Lisi: 
gosub 9985 

9950 aban=(choix$=chr$(27) or 
souris and choix=0): it aban then 
exit 

9955 if chois$>" " Ehen 
choix$=chr$(asc(choix$)+32% 
(choix$>="a" and choix$<='"'z")): ? 


if souris then 
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choix$;: exit 

9960 if choix$=chr$(13) or souris 
then aban=(choix=0): 
choix$=left$(menu$(choix),1): 

9965 cm=choix: gosub 9999: 
choix=choix-(choix$=chr$(10))+ 
choix$=chr$(11)): 
choix=choix-(nmenu+i)#(choix<O)+ 
(nmenu+1)*(choix>nmenu) 

9970 loop: am$=inkey$ 

9975 locate,,0: put(xmen,ymen), 


exit 


menu%(800): locate xom,yom, li 
PART TOUT ‘sense Es ses 
9985 do: inpen vm,wm: 


vm=min(vm@3+xmen*8+5,xm*8): 
wm=(min(wm@2,ym*8+ymen-1)@8)*8: 
console, ,4: for cm=1 to 2: 
boxf(vm-2,wm)-(vm+1,wm+/): next: 
console,,0: wm=wm@8: if choix<>wr 
then cm=choix: gosub 9999: cm=wm: 
gosub 9999: choix=wm 
9990 if ptrig then loop 
9995 return ‘ 
9999 console, ,4: 
boxf((xmen-(imen-8)#*(cm=0))*8+5, 
(ymen+cm)*8)-((xm+(cm=0))*8, 
(ymen+cm)*8+7): console, ,0: return 


Remarques sur le programme : 


- La première partie n'est là que pour servir 
d'exemple, le menu ne commence qu'en 9900. 

- Laligne 9999 correspond à l'inversion d'une ligne sur 
l'écran. 

- Lesous programme, de 9985 à 9995, est la lecture de 
la souris. 

- Laligne 9965 parmet de gérer le choix des lignes avec 
les flèches : 

choix=choix-(choix$=chr$(10}}+(choix$=chr$(1 1)) 

choix-choix-(nmenu+1)"(cholx<0)+(nmenu+1)" 

(choix>nmenu) 

10estlecode de laflèche vers ie haut et 11 de celle vers 
le haut. 

Le basic manipule les variables ioglques (vrai=-1 & 
faux=0) comme des nombres dans les expressions 
arithmétiques : dépasser les limites du menu, place à 
l'autre bout du menu. 

- L'abandon correspond à la touche ESC sur le TO16 
et compatible. Son code est 27 et correspond à la touche 
cnt+[ sur TOB8 et TOS. 


Ei voici un nouvel exemple avec deux utllisations de 
menu déroulant : 


10 CLS:? ‘'Le MENU DEROULANT de 
MAX'': xm=27: gosub 9999 

201 ? © CROIS -1ère lettre" 
30 ? -flèches+ENT" 
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HO 7 -souris, click" 
A -gauche enfoncé" 

HO? ! abandon: ent|['"" : 7? 
bos(0.,0)-(208,50) 

60 do 

70 ? "Fi=menu F2=fichs cnt|=fin 


2"s3:2#1$= chr$(144): £f2$=chr$(145) 
80 a$=input$(i): if a$=f1$ then 
gosub 100 else if a$=f2$ then 
gosub 200 else print a$ 
90 ‘if aÿ<>chr$(27) then loop 
99 end ‘---------------——-—-—-= 
100 menu$=''menu:'"" "exemple d'appel 
110 nmenu=4: restore 120: for i=i 
to nmenu: read menu$(i): next 
120 data Atficher Entrer Modifier, 
Sélectionner 


130 xmen=2: ymen=0: gosub 9900 


140 affic=(choixs$=''A"): if affic 
then ? ‘Afficher 

150 entre=(choix$="E"): 1f entre 
then ? "Entrer 

160 modit=(choix$=''M''): if modif 
then ? "Modifier 

170 selec=(choixs=''S"): if selec 
then ? ''Sélectionner" 

180 if aban then ? ''aban' 

190 return 

200 menuÿ=''fichs:" 

210 nmenu=4: restore 220: for i=1 
to nmenu: read menu$(i)j: next 


220 data Lire,Sauver,Effacer, 
Répertoire 


230 xmen=9: vmen=U: gosub 9900 

240 lire=ltchoixs$s="L'}: it lire 
then ? ‘Lire 

250 sauve=(choixÿ="S''): if sauve 
then ? "Sauver" 

200 erfac=(choix$="E"): it etfac 
then 2? "Eftacer'" 

210 reper=(choix$="R"): if reper 
then ? ‘Répertorier" 

280 it aban then ? ‘'aban' 


290 return 
9900 "menus , 
choix$s ,ahan 


menus().nmenu=> 


9905 xom=pos(Ü): vom=csrlin: if 
not menude]ja then menudeja=-i: 
dim menu“ (8UU) 

YY10 Imen=i4: tor cm=i to nmenu: 


Imen=max(imen,.len(menu$(cm)}:nex 

9915 xm=xmentiment li: 
vm=vmentnmenut+li: get(xmen,ymen)- 
(xm,vm),menu#t800)j: locate 
xmen,ymen,U: boxtf(xmen,vmen)- 
{xm,vm)" 
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9920 box(xmen*8+2,ymen*8+7)- 
(xm*k8+3,ym*8+3): 
line(xmen*8+4,vym*8+4)- 
(xm*8+4,ym*8+4): line- 
(xm*8+4 ,ymen*8+10) 


9925 for cm=1 to nmenu: locate 
xmen+1i,ymen+cm: ? using !'&''; 
menu$(cm): next: locate 
xmen+i,vymen,i: ? menu$:: locate 
xm-8: ? “ab=cnt{'";: play 
"lidosi'': am$=inkey$ 


9930 console, ,4: 
boxf (xmen*8+8,ymen*8+8)- 
(xmen*8+15,ym*8-1): console, ,0: 


choix=îi 

9935 do: cm=choix: gosub 9999 
9940 do: choix$=inkeys: 
soùuris=ptrig: it choix$ÿ=""! and 


not souris then 1oop 

9945 play ‘lisi'"': if souris then 
gosub 9985 

9950 aban=(choix$=chr$(27) or 
souris and choix=0): if aban then 
exit 

9955 if choix$>'"" ‘ then 
choix$=chr$(asc(choix$)+32% 
(choix$>='"'a'" and choix$<=''2")): ? 
choix$;: exit 

9960 if choix$=chr$(13) or souris 
then aban=(choix=0 ): 
choix$=left$(menu$(choix),1):exit 

9965 cm=choix: gosub 9999: 
choix=choix-(choix$=chr$(10))+ 
choix$=chrs$(11)): 
choix=choix-(nmenu+1)*(choix<O)+ 
(nmenu+1i)*(choix>nmenu) 

9970 loop: am$=inkeys 

9975 locate,,0: put(xmen,ymen), 


menu#%(800): locate xom,yom, 1 
ANOU TÉRUEn, ‘spears 
9985 do: inpen vm,wm: 


vm=min(vm@3+xmen*8+5 ,xm*8 ): 
wm=(min(wm@2,ym*8+ymen-1)@8)*x8: 
console, ,4: for cm=1 to 2: 
boxf(vm-2,wm)-(vm+1,wm+7/): next: 
console, ,0: wm=wm@8: if choix<>wm 
then cm=choix: gosub 9999: cm=wm: 
gosub 9999: choix=wm 
9990 if ptrig then ioop 
9995 return 
9999 console, ,4: 
boxf ((xmen-(Imen-8)*(cm=0))*8+5, 
(ymen+cm)#*8)-((xm+(cm=0))*8, 
(ymen+cm)*8+/): console, ,0:return 
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TEORISTE 


POUR RECEVOIR CHEZ VOUS, 
TOUTE L'ACTUALITÉ DES MICROS THOMSON 





ABONNEZ-VOUS 





Tenez-vous au courant des dernières informations concer- 
nant la micro des 8 bits et devenez un lecteur privilégié en 
recevant TEO avant les autres. 


N'HESITEZ-PAS, ABONNEZ-VOUS. 
IL VOUS MANQUE D'ANCIENS NUMEROS ? 


Nous pouvons vous aider dans la limite de la disponibilité de 
nos stocks. 


TEOPHILE ANCIENNE VERSION 


(au minimum 5 numéros) 
Attention ! Les numéros 7 et 8 ne sont plus disponibles. 


Numéros disponibles : 5, 6, 9, 10, 11, 12, 13: 
TLNUMETO nes encsenes 15 francs (précisez les numéros) 
La collection complète : 80 francs 


TEO NOUVELLE VERSION 


Numéros 1 à 7 : 
T'NUMÉNO ns 20 francs (précisez ies numéros) 
6 numéros : 100 francs 


Numéros 7 à 18 : 
1LINDMÉTOË rss 20 francs (précisez les numéros) 
11 numéros : 180 francs 


Attention ! Le numéro 4 n'est plus disponible. 


PARTICIPATION AUX FRAIS D'EXPEDITION 


Pour 5 numéros et plus : 10,00 F 
Pour la collection complète : 20,00 F 


























BULLETIN D'ABONNEMENT 
NOM : 
PRENOM : 
ADRESSE : 
CODE POSTAL : VILLE : 


Je m'abonne pour 6 numéros à 150 francs 
Je m'abonne pour 12 numéros à 300 francs 
Je désire recevoir les anciens numéros de TEO que je 
précise ci-dessous et vous joins un chèque de + 10 ou 20 
francs de frais de por, à l'ordre de TEO. 


BON DE COMMANDE ANCIENS NUMEROS 


TEOPHILE 
la collection 


80 F 
Se - + 15F 


TÉOPHILE n° 1à7 


Rapye 
20 F 


DD 


la collection 
les n° 





TEOPHILE n° 7 à 17 
la collection 
les n° 
FRAIS DE PORT 


Chèque à l'ordre de TEO 





Précisez la machine que vous utilisez : 


Signature : Signature des parents : 


(si mineur) 
Bulletin à retourner sous enveloppe affranchie avec votre 


chèque à l'ordre de TEO à : PROMEDIA, Service Abonne- 
ment, 3 rue des 2 places, 69009 LYON Tél : 78/83/84/77 
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TEORISTE 


TEO 


Echange jeux,  K7, 
MO6, envoyez liste. 
Philippe ANGUENOT 2 
rue Volvire de Brassac 
bat E 34300 
CAP D'AGDE 
Tél : 67/26/56/94 





MO5 cherche QDD ou 
lecteur DKS + contrôleur 
musique et JX (petit 
prix). Alain MERCHET 
159 rue de la Pierresse 
31810 LE VERNET 
Tél : 61/08/56/90 





Vends TO7/70 +lect. de 
cass + QDD + 10 disk 
remplis + logiciels + li- 
vres + ext. musique et 
jeux + 2 manettes. 
Michel LACROZE rue de 
la Vierge du Refuge Bt 
C. Peguy A7 54200 
TOUL Tél : 83/64/49/01 





Cherche une ou plu- 
sieurs cartouches BA- 
SIC pour TO7/70. Pierre 
ZUGMEYER 21 rue de 
Rosenvwiller 67560 
ROSHEIM Tél : 88/50 
25/68 (après 20h). 





Vends pour MOS5 et 
TO7/70 cassettes 
CAO de lLoriciel et 
Animatix d'Infogrames 
200 F et 150 F ou 300 
Fles 2. Philippe GALAIS 
les Terres Douces 
St Bomev 28330 
AUTHON DU PERCHE 
Tél : 37/49/90/15 





Vends TO9 complet, 2 
lecteurs de DSK 320 K, 
lecteur de cassettes, 
extension manette + 2 
manettes , extension 
télématique, cartouches 
colorpaint et caractor Il, 
450logiciels, plus de 120 
disquettes, boîtes de 
rangement, collection 
complète de TEO, livres 
divers, faire offre 
«Valeur neuve plus de 
15 OOO F», Jean- 
Claude HENNART 34 
rue de Fréjus 59155 
FACHES THUMESNIL. 
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Vends TOSHIBA T1100 
(Papman). C'est un PC 
portable 512 Ko, prise 
RS232C : 5 000 F. Tél : 
78/03/18/46 poste 451 
aux h. de bureau. 





Vends lecteur de dis- 
quette CLED 320 KO 
DFDD TO7, TO7/70, 
TO9 avec programmes 
divers. Excellent état : 
1 500 F. Daniel GEAY 
Osmoy-St-Valéry 
76660 LONDINIERES 
Tél : 35/93/21/04 





Vends disquettes 3"1/2. 
Prix 100 F. Tanguy 
DEKNUDT 15 rue 
St Firmin 59190 
MORBECQUE 
Tél : 28/40/70/38 





Vends logiciels pour 
Amstrad et Thomson. 
Vends pour Thomson 
matériels, livres,  re- 
vues, envoie liste contre 
enveloppe  timbrée. 
François ROYERE Les 
Eduens Bât A3 58000 
NEVERS 

Tél : 86/36/39/30 





Vends pour TO8 3 jeux 
(QCM, Rôle, Arcade) 
pour 40F (portinclus). Si 
vous m'envoyez Une 
disquette vierge 3,5 P 
SF/DD, je vous en offrl- 
ral 3 de plus. Vends ou 
échange Monopoly con- 
tre Marche à l'ombre 
pour TO8, TO9, TO9+, 
en DSK 3,5 pouces SF/ 
DD. Franck MARTY 
Quartier de Pic 09100 
PAMIERS 

Tél : 61/67/04/92 





Vends logiciels (passa- 
gers du vent 1, vol solo) 
en DKpour TOS, 9,9+ et 
(la geste d'Artillac) en 
K7 pour TO. Prixintêres- 
sant. Marc MICHEL Le 
Saveton Cottance 
42360 PANNISSIERES 
Tél : 77/28/05/02 





Cherche contacts TO9 
sur Finistère près de 


Quimper pour tous 
échanges. Yann LE 
FAOU 14 quai St Lau- 
rent 29120 PONT- 
LABBE Tél :98/87/37/32 





Vends imprimante grà- 
phique GP 500 (1500F), 
MOS5 + lecteur K7 + 2 
manettes + extension 
musique et jeux (1 500 
F), un mégabus (350 F), 
un lecteur DK 5"1/4 + 
contrôleur + 30 disquet: 
tes (1 500 F), 1 prisb 
minitel (200 F) + nom- 
breux jeux pour achet 
teurs ; TNT, 3 D Fight, 
Sapiens, 5e axe, Vam- 
pire, Empire, Aigle 
d'or. François NOLF 
15 allée Maurice Barrès 
59200 TOURCOING 
Tél : 20/46/52/10 





Achète TOB8 + lecteur à 
un prix intéressant. 
Gilles NAVINER 7 Sen- 
tier Sous le Jardin 93430 
VILLETANEUSE 





Recherche personnes 
possédant TO8, TO% 
pour échanger nom- 
breuxjeux (Gdr prix 500 
cc ; Nitroglycérine, 
Passagers du vent li...) 
à Martigues, Fos/mer, 
Istres et les alentours. 
Réponse assurée. Sté- 
phane REUS Bd Louis 
Aragon - lot 1 - Les 
Plaines d'Arnete 13920 
ST MITRE LES REM- 
PARTS 

Tél : 42/80/98/66 





Vends lecteur DK + 10 
DKjeux +10DKvierges: 
le tout en 3"5, cède 
1900 F avec manuel. 
Cédric GOUGLER 7 al- 
lée de l'Aude 78990 
ELANCOURT 
Tél : 30/50/83/62 





TO8 cherche contacts 
pour échanges sur DSK 
ou K7. Envoyez votre 
liste. Réponse assurée. 
Didier ADAM 61, 32rue 
E. Jacquet 59000 LILLE 
Tél : 20/06/22/48 





Je possède un TO8D et 
je cherche un corres- 
pondant à Marseille de 
mon âge (10 ans) pour 
échanger disquettes de 
jeux. Matthieu DUPART 


230 avenue du Prado, 


13008 MARSEILLE 
Tél : 91/22/81/72 





Cherche contacts sur 
Thomson (TO8 de préfé- 
rence) pour échanger 
des jeux et copies et 
créer un club. 
Alexandre CHAZAL 7 
résidence  Comman- 
dant Louis Bouchet 
78990 ELANCOURT 
Tél : 30/51/83/70 





Vends TO7/70 + moni- 
teur + lecteur DSK 320 
KO + lecteur QDD + 
extension 64 KO +inter- 
face imprimante + inter- 
face joystick 11 + nom- 
breux jeux K7 + 10 DSK 
de jeux : le tout 6 500 F 
(valeurréelle 14000F) + 
librairie de livres. 
Jérôme GUYO 
50 rue d'Arras 62223 
ROCLINCOURT 
Tél : 21/55/40/16 





Cherche listings initia- 
tion ou jeux pour MO6. 
Hervé SANCHEZ 
97 rue de la Barrière 
19000 TULLE 
Tél : 55/26/71/98 





Cherche possesseurs 
de MOS5 pour échange 
de logiciels. David 
REINPRECHT Les Jon- 
quilles 14 route de sou- 
cieu 69530 BRIGNAIS 
Tél : 78/05/38/84 





Achète contrôleur de 
disquette, réf CD 90351 
et Drive 640 KO 3"1/2, 
réfDD 90352 pour TO7/ 
70 ainsi que de nom- 
breux logiciels de jeux, 
utilitaires, éducatifs en 
K7 (pour l'instant). Faire 
offre. Frederik NIEMC- 
ZUK 420 avenue de Mil- 
lau plage 12100 MiLLAU 
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ANNONCES 


Affaire ! Vends, pour 
TO8 DSK 3"1/2, l'Aigle 
d'or : 150 F, Speedway : 
100 F, ou 190 Fles 
deux. Dominique DAR- 
DAILLON 20 rue AI 
phonse Allais Mas Ver- 
dier 30000 NIMES 
Tél : 66/29/52/08 





Vends TO7/70 clavier 
mécanique +basic 1.0 + 
extension mémoire 64K 
+ extension Modem 
complète + lecteur QDD 
+ disquettes + 2 livres. 
Le toutexcellent état :2 
500 F. Vends un TO8 
parfait état : 1 000 F. 
Christian FOUET 3 
place de Belgique 92250 
LA GARENNE COLOM 
BES Tél : 47/81/01/01 





Vends extension incrus- 
tation, état neuf, pour 
TO7, TO7/70, MOS. 
Prix: 250 F. Christophe 
FRANCOIS 4 bis rue 
des Bouillons 78740 
EVECQUEMONT 
Tél : 34/74/94/99 








Vends TO8 + lecteur de 
DSK 81/2 + logiciels + 
péritel + crayon optique 
+cartouche assembleur 
+ livres. Prix : 3 000 F. 
Sylvain NGUYEN 32 
avenue du Colonnel Pi- 
cot Bât Le Marc Ent C 
83100 TOULON 
Tél : 94/23/26/96 





Cherche correspondant 
TO9 pour échange de 
programmes et de jeux. 


TEO 


Karlm FETTOUHI-TANI 
Avenue Willam Booth 
La Moularde Bât E 13 
13012 MARSEILLE 
Tél : 91/35/53/80 





Echange de nombreux 
jeux (Saphir, Moto Da- 
Kkar, Yeti, Bleu War | et Il, 
etc.) contre de bons 
jeux. François PAIN- 
DORGE 1 rue de la 
Couture du Moulin 
94320 THIAIS 
Tél : 46/86/70/49 





Vends pour TO8, TO9, 
TO9+, sur DSK, Mono- 
poly + Beach-Head + 
Arkanoïd + Krakout + 
Slap Fight + Atomlk. Le 
tout : 100 F. Echange de 
jeux. Yann CHEVALIER 
15 rue André Messager 
59223 RONCQ 
Tél : 20/03/08/67 





Vends contrôleur de 
communications CC 
90232 : 185 F, contro- 
leur de disquettes 640K 
CD 90640 : 245 F. Paul 
GELINEAU La Hubau- 
dière La Chapelle- 
Rousselin 49120 CHE- 
MILLE Tél : 41/30/75/37 





Le  ciub Rungamme 
VOUS propose, pour tous 
Thomson, 25 services 
différents : journal, con- 
cours, échanges. 
Demandez une docu- 
mentation gratuite con- 
tre 2 timbres. Club 
RUMNGAMME 45 bis 
rue Jean Jaurès 70200 
LURE Tél : 84/30/26/96 





Vends TO7/70 + Inter- 
face Centronic. Cherche 
handler pour TO9et Star 
DP 510. Abel PRE- 
VEAU 29 rue Boureau 
Guérinière 93360 
NEUILLY PLAISANCE 
Tél: 43/00/12/58 





Looking for descriptions 
in english or german : 
Passagers du vent Il, 
Astérix, Les Mutants. 
Exchange D 3,5 or 5,25 


| optique 


with different  pro- 
gramms. People with 
interest, please write 


back. Christian BER- 
TELSBECK Theodor 
Storm STA 9, 2447 HEI- 
LIGENHAFEN FRG 
Tél : (04362)2977 





Urgent,  échangerais 
logiciels de jeux TO8 
(Sapiens + MGT + 5e 
axe + aigle d'or) contre 
un Bob Morane ou Sor- 
cery. Vends «Aven- 
gers» : 220 F. Morgan 
VICHARD La Croiserle 
35510 THORIGNE 
Tél : 99/62/08/11 





Vends TOS9 lecteur 
DSK 128 KO + écran 
couleur + imprimante + 
papiers +souris + boîte 
rangement + 10 DSK 
Jeux + joystick + crayon 
+ ordinateur 
Sharp de poche 2 KO. 
Prix : 7 000 F. Bernard 
GOURLEZ 44 rue du 
Tilloy 62220 CARVIN 
T6! : 21/74/04/93 





Echange Sharp PC 
1211 + imprimante + li- 
vres contre 5 DSK 3"1/2 
logiciels TO8. Pierre 
LEGRAS Les Tilleuls 
Bât D n° 40, 11000 
CARCASSONNE 
Tél .68/72/68/13 





Vends TO8 + lecteur 
DSK 3"1/2+ crayon opti- 
que + souris + Utilitaires 
+jeux (+ de 70) : 3500 
F. Vends jeux (news) 20 
Fpièce. Philippe KULA- 
Hi 15 bis rue M Dela- 
vault 95400 ARNOU- 
VILLE Tél : 38/86/05/87 





Vends Amstrad CPC 
6128 moniteur couleur + 
10 DSK + 20 jeux + 10 
revues + 2 disquettes 
langage. Valeur : 6 000 
F, vendu 3 200 F. Frédé- 
rl: GANDON 102 rue 
Jean Richard Bloch 
93150 BLANC-MESNIL 
Tél : 48/66/12/65 





Vends MO6 sous garan- 
tie + crayon optique + 25 
jeux originaux + 2 joys- 
tick + librairies et ma- 
nuels : cède 2 500 F, 
Cédric GOUGLER 7 al- 
lée de l'Aude 78990 
ELANCOURT Tél : 30/ 
50/83/62 (après 17 h). 





Vends colorpaint car- 
touche pour TO : 250F 
{cartouche + doc). 
Cherche nouveautés 
seulement sur TO8 
DSK 5"1/4 et 31/2. 
Envoyer timbres pour 
réponse. Martiat HAU- 
TEREAU 26 rue de 
Bessancourt 95480 
PIERRELAYE 





Vends TOSHIBA Pap- 
man T1100 (portable 
compatible PC) 512Ko, 
RS232C 5000F. TEL. 
hres bureau 78.03.18.46 
{Patrick CHAPELUT) 





TOB isolé cherche cor- 
respondant pour 
échange de jeux, pro- 
grammes ou astuces. 
Envoyez vos listes ou 
téléphonez. Philippe 
ORFEO Le Mail Bât G, 
rue de la Crau 13014 
MARSEILLE 
Tél : 91/98/65/64 





Echange ou vends K7 
Thomson MOS. Cher- 
che jeux Adapt BD et 
utilitaire dessin. Sté- 
phane RIGOT Nespouls 
19600 LARCHE 
Tél : 55/85/82/66 





Vends TO8 couleur + 
lecteur DSK + 1 manette 
de jeux +crayon optique 
+ guide + livre Basic + 
plusieurs revues + nom- 
breux jeux (DSK). Guy 
GAMBU 78700 CON- 
FLANS STE HONO- 
RINE Tél : 39/19/82/75 





Possesseurs de Thom- 
son, Votre nouveau Sser- 
veur Minitelestné136 15 
code Club A * Anatole. 
Anatole SCHAFF 19 rue 


ANNONCES 


Boussingault 67000 
STASBOURG 





Vends TO7/70 + CLED 
320 K + LEP + CM Sé- 


cam+ContCom+Basic . 


128 + sriptor + livres + 
revues. Le tout : 3 500F. 
Imprimante MT 80S : 
1 000 F. C. CHA- 
MAYOU 8 rue de Paris 
92110 CLICHY 
Tél : 47/37/29/88 





Vends UC TO?7/70, 
mécanique + 3 langages 
+ LEP + LED + DSK 
pleines (400 logiciels) + 
5 cartouches + 8 K7 + 
livres. Le tout :4 800 F. 
Détail possible. Prix à 
débatte. Vends Imprl- 
mante 1 500 F. Xavier 
DUREL 7 bis avenue de 
la République 94600 
CHOISY LE RO 
Tél : 48/52/49/88 





Echange nombreux 
jeux (+ DE 115) TO8, 
TOS, TO9+ dont 3 Bob 
Morane, Aquanaute, 
Mission, Game over, 
Arkanoïd, etc. En- 
voyez liste. Cherche 
Bob Morane IV. Frédéric 
PONS 1 cité Pasteur 
91220 BRETIGNY 
Tél : 60/84/70/16 





Possesseur d'un TOS, 
cherche contacts, 
échanges de logiciels 
sur disquettes. En- 
voyez liste de logiciels. 
Si possible, contacts 
télématiques, par télé- 
chargement. Frédéric 
MOISY «Le Moulin du 
Prey» 27500 CORNE- 
VILLE SUR RISLE 
Tél : 32/57/02/74 





Vends TO7/70 +lecteur 
cassette + manette + li- 
vres + Basic + 16jeux : 2 
200 F. Jean-Christophe 
COIFFIER 59 chemin du 
Terrier 69360 TERNAY 
Tél : 72/24/65/47 





Vends ordinateur 
Tnomson TOSB (datant 
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d'un an et demi) avec 18 
jeux à manette et22 au 
ciavier. Le tout (manette 
et crayon optique com- 
pris) : 4000 F. Frédéri- 
que GEORGEL Lot 
Ruelle du Bois Rue du 
Pré Meaugé 55000 
COMBLES 





Vends pour TO8, TO9, 
TO9+ 3“1/2 : Dieux du 
stade let Il, Runway Il, 
Karaté, Foot Ball(150F) 
Green Beret, Runway, 
Super Tennis, Monopoly 
(150 F). Olivier GROUS- 
SET 51 rue Gabettat 
77500 CHELLE 
Tél : 64/21/24/65. 





Vends TO7/70, Baslc + 
écran monochrome + 
clavier mécanique + 
lecteur cassette + 3 
jeux. Prix : 2 000 F, avec 
2 manettes : 2 200 F. 
Fabien HUBY 10 allée 
du Grésilon 35135 
CHANTEPIE Tél:99/53/ 
31/24 (h. de bureau). 





Vends lecteur disquet- 
tes 3“1/2 pour T07/70, 
TOB8, MO5, MOS : 1 475 
F. Cours infomatique 
(analyste) école univer- 
selle : 975 F. Paul 
GELINEAU Rés Leclerc 
A1, 2 rue du Bordage 
Chapeau 49300 CHO- 
LET Tél : 41/58/69/55 





Recherche personne 
ayant tapé le traitement 
de texte Momot paru 
dans les TEO n° 3et4. 
Guillaume BERTRAND 
11 rue Maurice Daniel 
44200 NANTES 
Tél : 40/47/68/38 





Vends logiciels à 100 F 
Hacker (MOS5, MO6, 
TO7/70, TOB), le Mali- 
fice des Atlantes (MO6, 
TO8, TO9, TO9+), Dom 
Camillo (MOS), Animatix 
(MO6). Cherche pro- 
grammes de jeux pour 
MO6. Gilles ROYER 2 
place Corneille 62126 
WIMILLE 
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TEORISTE 


COMPTABILITÉ 


ET 


INFORMATIQUE 


Dans ce numéro le juridique laisse la place à la comptabilité. C’est un domaine 
qui est souvent considéré comme difficile d’accès,mais il est nécessaire d’avoir 
certaines connaissances pour pouvoir créer, par exemple, une entreprise de 
développement de logiciels. L'auteur de cet article, Jean-Christophe ANGUENOT 
est responsable des audit comptables du cabinet Horizon PME. 


La diversification des besoins 
des entreprises en matière d'informa- 
tisation, sous quelque forme que ce 
soit, a imposé au législateur et à 
l'administration de prendre des dispo- 
sitions pour préciser le traitement 
comptable et fiscal qu’il convient de 
donner aux diverses opérations réa- 
lisées dans ce domaine. 


Le nouveau plan comptable 
général, approuvé par l'arrêté du 27 
Avril 1982 et entré en vigueur le 1er 
Janvier 1984, aparmis de distinguer de 
façon formelle les opérations relatives 
au Matériel Informatique proprement 
dit de celles se rapportant aux 
logiciels. 

La loi N° 84-578 du 9/07/84 
relative au développement de l'initia- 
tive économique, la loi N° 85-660 du 3/ 
07/85 sur les droits d'auteur et un 
document du 29/04/87 publié par le 
conseil national de comptabilité ont 
précisé les modalités de comptabili- 
sation des Achats, Ventes, Frais de 
conception et fabrication et autres 
opérations ayant trait à l'informatique. 
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Nous nous bornerons à exposer 
dans cet article les dispositions concer- 
nantle matériel Informatique, une se- 
conde étude que nous publierons 
ultérieurement traitera des logicieis et 
banques de données. 


Nous analyserons successive- 
ment les problèmes rencontrés par le 
Fabricant du matériel, puis parl'entre- 
prise utilisatrice. Le cas du revendeur 
ne présente pas d'intérêt particulier 
puisqu'il s'agit d'une activité commer- 
ciale classique. 


LE FABRICANT DE 
MATERIEL INFORMATIQUE 


Et tout d’abord le résultat comp- 
table: il est le déterminé à la fin de 
chaque exercice comptable (période 
de 12 mois) par différence entre, d'une 
part les prodults Hors Taxe réalisés 
pendant l'exercice sur les ventes des 
matériels fabriqués, et d'autre part, les 
charges supportées dans le cadre de 
la réalisation de l'objet de l’entre- 
prise. 
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Stockez et payez 
moins d'impôts 
BR 


On distingue principalement les 
charges d'achats de matières premiè- 
res et fournitures, les charges exter- 
nes de fonctionnement, les Impôts et 
taxes, les charges de personnel, les 
charges financières, et les amortisse- 
ments correspondant à l'usure que 
sont censées avoir subi les immobili- 
sations (c'est-à-dire les matériels 
constituant l'outil de travail) au cours 
de l'exercice. 

Ce résultat comptable paut être 
un Bénéfice en cas d'excédent des 
produits sur les charges, ou une parte 
dans le cas contraire. 

L'évaluation des stocks : à la 
clôture de l'exercice, les matériels non 
revendus doivent figurer dans le se- 
cond document de synthèse : le Bilan, 
état du patrimoine de l'entreprise, 


dans la partle actif. Ils sont évalués à 
leur coût de production, figurant par 
ailleurs, dans les charges au compte 
de résultat. 

Ces charges sont «annulées» par 
l'intermédiaire d'un compte de produit, 
etle stockestporté à l’Actif Circulant du 
Bilan dans un compte de produits finis. 
(N°355) 

Un schéma similaire est prévu 
pourinscrire les Matériels en cours de 
production (N° 330) à l'Actif du Bilan. 

Au cas où un stock en fin d'exer- 
cice semble s’être déprécié au regard 
du prix probable de vente, l'entreprise 
pourra comptablllser cette perte la- 
tente par une provision pour dépré- 
ciatlon, qui se traduira par l'Intermé- 
diaire d'un compte decharges, comme 
une diminutlon du bénéfice Imposable, 
donc des éventuels Impôts à payer. 

Si vous vous lancez dans la créa- 
tlon d'un TO8 D+ (ou d'une autre 
machine) vous aurez alors à faire face 
à des frais de recherche et de dévelop- 
pement. 

Lorsque de telles dépenses sont 
engagées par le constructreur en vue 
d'aboutir à l'élaboration d'un compo- 
sant ou d’un matériel de conception 
nouvelle, on les inscrit normalement 
en charges au compte de résultat. 
Toutefois, dans la mesure où il ne 
s'agit pas de recherche fondamentale 
non orientée sur un projet particulier, 
on estime que ces dépanses doivent 
pouvoir être déduites parfractions des 
résultats de plusieurs exercices, et 
non intégralement du résultat de l'exer- 
cice au cours duquel elles ont été 
engagées. 

Deux conditions doivent néan- 
moins être respactées : 

- les projets en cause sont nette- 
ment individualisés 

- chaque projet doit présenter de 
réelles chances de rentabilité ou de 
retombées commerciales. 

Il est alors possible, pour chaque 
projet concemé, d'estimer le montant 
des dépenses de recherche et déve- 
toppament engagées et portées en 
charges, afin de les «annuler» par la 
comptabilisation d'un produit (compte 
N° 72 : production Immobllisée). 


La contrepartie sera l'inscription 
de ce «capital intellectuel» investi à 
l'actif du bilan dans un compte d'Immo- 
bilisations incorporelles : (compte 
203 : Frais de recherche et dévelop- 
pement). 





L'Auteur 


2183 : le compte 
est bon ! 


Cet élément d'Actif sera ensuite 
amorni sur une période maximale de 
cinq ans, permettant ainsi l'étalement 
de la charge sur plusieurs exercices. 

Immobiliser de tels frais ne cons- 
titue toutefois qu'une faculté pour les 
entreprises car cela entraîne une aug- 
mentation du résultat imposable de 
l'exercice à la clôture duquel on pro- 
cède à cette régularisation, ce qui peut 
présenter un aspect dissuasif au cas où 
le résultat est un bénéfice. Sur le plan 
fiscal, le seul mode d'amortissement 
autorisé, est le système linéaire ou 
constant. 

Quant à la question du résultat 
imposable, il n'existe pas de distorsion 
particulière en les règles comptables et 
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fiscales et le résultat Imposable corres- 
pond en principe au résultat comptable 
dégagé au compte de résultat. 


L'ENTREPRISE UTILISATRICE 
DE MATERIEL INFORMATIQUE 


Lorsque l'entreprise acquiert un 
matériel Informatique en vue de 
l'exploiter de façon durable, elle doit le 
porter à l'Actif dans le compte 2183 : 
Matériel de Bureau et Informatique, 
pour sa valeur Hors Taxe (dans la 
mesure où elle récupère la TVA, c'est- 
à-dire où son activité est soumise à 
TVA). Cette valeur d'actif comprend 
les frals accessoires à l'acquisition 
tels le transport, l'installation, droits de 
douane, mals pas les droits de 
mutation, les honoraires, les frais de 
missions et d'actes qui en revanche 
peuvent être portés à l'actif dans un 
compte de frais d'acquisition. Lesfrals 
financiers ne peuvent eux, qu'être 
passés en charges. 

SI l'entreprise s'est fabriquée 
elle-même un matérlel qu'elle con- 
serve ensuke pour sa propre utillsa- 
tion, on a recours à un procédé similaire 
à celui des frais de recherche pour 
l'inscrire au compte 2183. 

Un problème est posé avec le 
matériel de faible valeur : l'inscription 
d'un matériel à l'Actif du Bilan engen- 
dre la miseen place d’un plan d'amor- 
tissement destiné à permettre à 
l'entreprise de le renouveler lorsque 
cela s'avère nécessaire {pour des 
raisons d'obsolescence  technologl- 
que en ce qui concerne l'informatique 
du fait de l'évolution très raplde des 
procédés de traitement des capacités 
de stockage et de la vitesse de travail 
des appareils). Il en découle des 
obligations comptables et administrati- 
ves notamment au niveau de la lasse 
fiscale qui semblent être mal adaptées 
aux matériels de faible valeur dont le 
renouvellement peut s'avérer fréquent 
et la durée d'utillsation probable, pour 
le moins incertaine. 

Alnsi, pour des petits matériels et 
outillages Informatiques (ou autres) 
dont la valeur unkalre Hors Taxe 
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n'excède pas 2 500 F, faculté est 
laissée aux entreprises de ne pas les 
immobiliser et de les passer directe- 
ment en charge, allégeant ainsi le 
traitement comptable de l'opération, 
et réduisant directement le Bénéfice 
imposable de l'exercice d'acquisition. 
Cette mesure semble fort oppor- 
tune puisqu'elle permet d'inciter les 
entreprises à se doter d'un petit Maté- 
riel et outillage pertormanten les déga- 
geant de préoccupations comptables 
et fiscales qui demeurent parois un 
frein pour de petites structures ne 
disposant pas de moyens matériels ou 
humains pour traiter leur gestion. 
L'amortissement en lui même : la 
valeur d'inscription à l'Actif constitue la 
base amortissable. On a la possibilité 
d'utiliser le système linéaire ou le 
système dégressif qui permet de déga- 
ger de plus grosses annuités au début 
de la période d'amortissement, et donc 
de réduire de façon plus substancielle, 
les premiers bénéfices imposables. 


La durée d'amortissement est en 
principe de cinq ans maisilest possible 
de la réduire en justifiant d’une utilisa- 
tion intensive. 

Pour les lecteurs avertis, nous 
préciserons que les régimes de droit 
commun en matière d'amortissements 
dérogatoires, différés et de cession 
s'appliquent normalement aux maté- 
riels informatiques. 

Une solution: le crédit-bail. Les 
redevances sont comptabilisées dans 
un compte de charge de location. Le 
matériel ne sera inscrit à l’Actif du Bitan 
qu’à la levée de l'option, pour le prix 
d'achat résiduel convenu contractuel- 
lement. 

L'administration s'est vue con- 
trainte de prendre des mesures pour 
réprimer des abus en ce domaine. En 
effet, des entreprises désireuses d'ac- 
quérir un matériel informatique, négo- 
ciaient avec le fabricant un crédit-bail 
sur une durée sensiblement inférieure 
à la durée d'amortissement usuelle- 


ment admise, entraînant ainsi une 
comptabilisation plus rapide des char- 
ges en location qu'en dotations aux 
amortissements ; et donc une éco- 
nomie d'impôts plus rapide. Ces prati- 
ques ont été qualifiées d’abus de droit 
et la déductibilité fiscale des charges 
de location ainsi comptabilisées est 
systématiquement remise en cause en 
cas de contrôle fiscal. 

Des informations au sujet des 
matériels pris en crédit-bail sont 
d'ailleurs demandées dans la liasse 
fiscale à la clôture de l'exercice. 

Si votre idée était de vous lancer 
dans la création d'entreprise, n'hési- 
tez pas, c'est une aventure passion- 
nante. Par contre vous ne pourrez pas 
vous passer de comptabilité, et cet 
articie n'en trace que les grandes li- 
gnes. Il vous faudra donc plonger un 
peu plus dans le plan comptable, ce 
qui est nettement moins fastidieux 
lorsqu'on le fait pour sa propre 
entreprise. M J.C.A. 





JURISPRUDENCE 


Règlement n° 20005/88 de la 
commission des Communautés Eco- 
nomiques Européennes du 05/08/88. 


Se référant au règlement 
n°2176/84 du conseil de la CEE en date 
du 23 juillet 84 relatif à la défense 
contre les importations qui font l'objet 
d'un dumping ou de subventions de la 
part de pays non membres de la CEE, 
la commission des Communautés Eu- 
ropéennes a annoncé dans un avis 
publié au Journal Officiel des Commu- 
nautés Européennes l'ouverture d’une 
procédure «anti-dumping» concernant 
les importations d'imprimantes à mar- 
guerite originaires du Japon. 
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Afin de supprimer l'effet néfaste 
du dumping, pratique anticoncurren- 
tielle s'il en est, la commission a 
institué un droit de douane provisoire, 
unetaxe de 43,2% surlesimportations 
japonnaises d'imprimantes sérielles à 
impact à caractères entièrement for- 
més. 


TEC et Tokyo Juki, exportateurs 
moins gourmands, verront leurs 
exportations vers la CEE frappées 
d'une taxe de 12,4% seulement ! 


La rentrée promet une hausse 
des prix de ces matériels de l’ordre de 
10 à 15%. 
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La commission Européenne vient 
subitement d'abandonner l'enquête 
qu'elle menait sur le géant américain 
IBM. Cette firme avait fait, dans un 
passé récent, l’objet d'une plainte en 
bonne et due forme de la part de 3 
entreprises hollandaises. 


Ces dernières accusaient IBM de 
recourir à des contrats de location-bail 
qui manifestaient trop sa puissance, 
ce qui en faisait des contrats déloyaux 
à l'égard des autres entreprises. 


Après avoir discuté avec les 
dirigeants d'IBM, les 3 entreprises ont 
abandonné leur plainte ! 1 


 TEOScooP 


Du nouveau, du neuf, de l'exci- 
tant, du sensationnel, de l'inédit, vous 
en voulez, en voilà. Un jeu qui vient de 
chez Cobra Soft et qui s'appelle d'ores 
et déjà «Service action». 





Le jeu : vous êtes volontaire (oui 
mon capitaine) pour en baver. Et voilà 
que dès le 1er jour on vous propose 
un parcours du combattant avec mi- 
traillettes, attaques de chiens, com- 
bats, sauts d'obstacles et autres diver- 
tissements.… Tout ceci sous les ordres 
d'un chef autoritaire qui vous com- 
mande : «avance», «relève-toi»…, 
agrémentés de charmants bruitages, 
et d’une musique générique énergi- 
que. Sije vous dis qu'en plus, les gra- 
phismes sont au-dessus de la 
moyenne, vous en concluez, comme 
moi, que le jeu n'est pas mauvais, il 
est mêmetrès efficace et vous pouvez 
créer votre propre parcours avec plus 
d'ennemis, plus de boue. un parcours 
pour les hommes, les vrais | 


Toujours du neuf et toujours chez 
Cobra Soft. Mais cette fois-cice n'est 
pas un jeu d'arcade comme le précé- 
dent. l!s'agit de l'adaptation sur micro 
du jeu de société «Maxi bourse». 


Faites grossir votre caphal en 
bourse, spéculez sur vos actions, 
devenez un krack de labourse !Un jeu 
d'autant plus intéressant que l'on peut 
y jouer jusqu'à six joueurs ou équipes. 
Et attention, ces deux jeux vont sortir 
sur Thomson en même temps que les 
versions Atari et PC. 


Pour finir, c’est Infogrames qui 
nous réserve une agréable surprise 
avec «La quête de l’olseau du 
temps». Il s'agi du logiciel issu de la 
BD du même nom par Loisel et 
Letendre ; BD 6h combien primée qui 





L ï 
voit donc le jour à l'écran (le tout petit). 
Le soft a été conçu en collaboration 
avecles deux auteurs pourles graphis- 
mes et le scénario. Certaines scènes 
ont été créées spécialement pour le 
jeu, puis digitalisées. La BD originale 
est constituée de 4 tomes, 4 volumes 
dans lesquels Pelisse et Bragon, les 
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EVENEMENT 
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Heureux privilège pour les lecteurs de TEO : toute 
fraîche, la première Image de BOB MORANE 5 |! 


| personnages 
principaux, 
évoluent par- 
mi 9 man- 
ches (autant 
de mondes 
cohérents et 
fantastiques) 
à la quête de 
l'olseau du 
temps. Pour 
le logiciel une 
manche sup- 
plémentaire 
(qui n'existe 
pas dans la 
BD) a été créée. Actuellement déve- 
loppé sur Atari ST le jeu sortira aussi 
sur Amiga,PC et compatibles, Ams- 
trad. Ainsi sur Atari il nécessitera 3 
disquettes : autant vous dire que 
toute la complexité de cette superbe 
bande dessinée sera présente dans ce 
jeu mi-aventure, mi-arcade.ll 
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DIDACTICIELS : 
ENFIN INTELLIGENTS | 


Un nouveau type de logiciel vient 
de voir le Jour, alliant des connais- 
sances encyclopédiques à un raison- 
nement en perpétuelle évolution. Pour 
ce faire, il est le premier didacticiel à 
utiliser l'intelligence artificielle : 
CHRONOS. 


Apprendre avec un ordinateur : 
tel est le but avoué des didacticiels, 
depuis qu'ils existent. Malheureuse- 
ment, ceux-ci se limitent souvent à 
l'apprentissage répétitif de tables de 
multiplication ou de quelques règles de 
grammaire. Quant aux plus de 15 ans, 
les didacticiels ne sont, pour eux, qu’un 
moyen de contrôle des connaissances, 
plus proche du jeu. 

Pour passer à la vitesse au-des- 
sus, il fallait Voir beaucoup plus grand 
etinventer un logiciel qui intéresserait 
aussi bien les élèves, les étudiants 
que les professeurs ou les chercheurs. 
Il fallait donc inventer un nouveau 
concept de logiciel éducatif qui ait, 
enfin, un savoir à transmettre. 


C'est pourquoi, voilà quatre ans, 
une société: la Télémathèque, s'est 
montée dans l'extrême nord de la 
FRANCE, à Lille, se donnant pour 
noble but de fournir de la matière grise 
aux ordinateurs français (le reste du 
monde attendra un pau). Derrière cette 
idée, deux hommes : Jean-Michel 
FORESTIER, ingénieur en informati- 
que, pionnier des applications de 
l'intelligence artificielle et Guillaume 


50 


BOURGEOIS, docteur en histoire, 
spécialiste des centres documentai- 
res. Le résultat était inévitable : un 
logiciel expert en histoire. 





G. BOURGEOIS et JM. FORESTIER 


La Télémathèque compte au- 
jourd'hui six personnes qui travaillent 
en permanence avec des spécialistes, 
historiens et de nombreuses personna- 
lités afin de formaliser les connaissan- 
ces nécessaires à la conception des 
systèmes experts qu'elle élabore. Si 
vous n'êtes pas familiarisé avec ces 
techniques, une petite explication s'im- 
pose : 

J.M. FORESTIER : «le logiciel 
CHRONOS utilise l'une des applica- 
tions de l'intelligence artificielle : le 
système expert. Il s’agit, en fait, de 
faire reproduire le raisonnement d’un 
expert, en l'occurrence un historien, 
par un ordinateur, de façon à ce que 
l'utilisateur ait l'impression de s’adres- 
ser à un historien qui comprend ses 
questions, luirépond et luisuggère des 
sujets qui intéressent l'utilisateur». 

La grande nouveauté de CHRONOS 
est d'appliquer ces techniques à un 
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produit grand public et, nous le ver- 
rons, de laisser la possibilité de trans- 
former aussi bien les connaissances 
de l'ordinateur que sa façon de penser. 
Le système permet toutes les évolu- 
tions imaginables. 


G. BOURGEOIS : «CHRONOS est, 
en fait, composé de deux couches 
superposées : la partie Intelligence 
artificielle, qui constitue l'interface 
entre le logiciel et l'utilisateur, et la 
base de données constituée, pour la 
disquette «FRANCE contemporaine» 
de 8000 faits et de très nombreux 
textes de référence. La couche dite 
«intelligente» analyse les questions 
posées par l'utilisateur et propose des 
réponses et des «cheminements intel- 
lectuels» en fonction de règles que 
nous lui avons introduites. Ces règles 
sont de type : si un évènement est 
antérieur à mars 1934, si cet évène- 
ment est postérieur à novembre 1933, 
et si cet évènement concerne Alexan- 
dre STAVISKY, alors laquestion posée 
concerne l'affaire STAVISKY (pour 
ceux à qui cela ne dit rien, rendez-vous 
dans queiques lignes)». 

ll est donc possible de générer 
ses propres règles et la «programma- 
tion» très simple se fait avec une 
dizaine de mots du langage courant. 
Elle est donc accessible, y compris 
aux personnes qui n'ont jamais fait 
d'informatique. Ceci dit, celles qui sont 
déjà en mémoire sont assez bien 
pensées. 


CHRONOS n'intègre pas de com- 
mentaire sur les faits qu'il contient ; 
cette démarche vise, outre l'objectivi- 
té, à permettre des grilles de lecture 
variées. Par contre, l'option «notes 
et commentaires» vous permet d'an- 
noter tous les faits (aussi bien les per- 
sonnages que les données sur la pro- 
duction) avec votre commentaire. 


Le concept du système expert 
pilotant une super base de données 
étant né, il ne restait plus qu'à lui 
trouver des applications. La série 
CHRONOS comprend donc deux 
bases qui contiennent à la fois des 
données et le système expert qui 
permet d'y accéder : la FRANCE 
contemporaine (1848-1944) et la vie 
politique dans le monde, sur la même 
période. Il n'est donc pas nécessaire 
de posséder les deux, mais à part 
quelques informations communes, 
les données sont différentes. Ces 
bases généralistes comportent des 
éléments adjacents de la vie quoiti- 
dienne, des techniques ou des arts … 


Par contre, ilexiste des basesthé- 
matiques qui permettent d'aller très 
loin dans un domaine. Ces bases né- 
cessitent l’utilisation de l'un des deux 
produits généralistes. Il existe quatre 
bases thématiques très complètes, 
toujours sur cette même période : les 
questions démographiques et écono- 
miques, base qui contient des don- 
nées chiffrées sur les classes d'èges, 
l'immigration dans le mondeet bien sûr 
les chiffres de la production agricole et 
industrielle … dans le monde entier, 
année par année, les tendances, les 
analyses. La base sur les sciences et 
techniques avec la chronologie des 
inventions, l'état des records de 
vitesse aériens … La base des arts et 
cadre de vie, qui situe de manière 
comparative l'évolution de l'esthétique 
et des goûts, y compris dans le do- 
maine de la mode et de la cuisine ; elle 
traite aussi des sports et d’autres pro- 
blèmes de société. 

Le caractère encyclopédique du 
produit posait un problème : le stoc- 
kage sur disquette. 


Chrerve 


Etavishy Alexandre Elovéale rupea 
CtRsg-11-20). Cuasix (1594-02), 


JM. FORESTIER : «Pour que tout 
celatienne le moins de place possible, 
nous passons par une première phase 
de compilation du système expert, puis 
une phase de compression des don- 
nées. Cela nous permet defaire tenir la 
FRANCE contemporaine (1848-1944) 
sur 700 ko, donc deux disquettes PC 
5”1/4 ou une disquette 3”1/2. 
CHRONOS, révolution française tient, 
lui, sur une seule disquette 5”1/4. Mais 
une deuxième disquette contiendra les 
textes de référence auxquels on ac- 
cède par les menus de la disquette 
principale. Globalement, cela corres- 
pond à un taux de compression de 1 à 
5 : 3Mo sur deux disquettes 5”1/4". 


La Télémathèque a aussi déve- 
loppé un autre produit dans la série 
CHRONOS, mais dédié, 1989 oblige, 
à une période plus restreinte : la révo- 
lution française. Avec les droits de 
l'homme et ce qui en découle : la 
citoyenneté, le suffrage universel et 
aussi, en amont : les philosophes, les 
débuts de la révolution industrielle en 
FRANCE, y compris les révolutions 
anglaise et U.S. 

Comme la période étudiée est 
assez courte (1789-1800), il y a beau- 
coup de documents accessibles direc- 
tement. Un produit intégré qui peut tout 
à fait servir de support pour un cours, 
puisqu'il comprend les textes de réié- 
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rence et les bibliographies des person- 
nages principaux. 


La meilleure façon de se rendre 
compte du bouleversement qu'apporte 
CHRONOSdans le monde de l'Ensei- 
gnement Assisté par Ordinateur, est 
encore de l'essayer. 


Prenons un utilisateur se servant 
de CHRONOS pour la première fois 
(par exemple moi-même) et observons 
le déroulement des opérations. 

Après avoir lancé CHRONOS - 
précisons qu'il s'agit de la disquette 
FRANCE contemporaine  (1938- 
1944)- un premier menu s'affiche. Il 
faut bien en profiter car c'est aussi le 
dernier ; après cela, il ne s'agira plus 
que d'un dialogue entre l'historien 
(l'ordinateur) et le béotien (toujours 
moi). Six choix vous sont proposés 
et sans hésiter, je sélectionne «inter- 
roger la base chargée». Un «masque 
de saisie» apparaît : il s'agit en fait 
d'un espace qui vous permet de poser 
votre question en langage naturel ; et 
justement, j'ai une question : je n'inté- 
resse à «l'affaire STAVISKY». 

En cette période de rentrée sco- 
laire, une petite révision s'impose : 
Serge Alexandre STAVISKY est un 
immigré russe israélite arrivé en 
FRANCE au début du siècle. Il devint 
très vite riche et connu du tout-Paris, 
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tout en pratiquant allègrement les 
chèques sans provision et autres es- 
croqueries. Au début de l'année 1934, 
un «trou» de 500 millions est découvert 
dans la caisse du Crédit Municipal de 
Bayonne. Le scandale éclate mais 
STAVISKY a déjà fui. Lors de son 
arrestation, il meurt dans des condi- 
tions qui restent troubles et ne peut 
donctémoigner. Le journal d'extrème- 
droite, l'Action Française (on ne 
parlera jamais assez du pouvoir de 
la Presse …) attaque le gouverne- 
ment CHAUTEMPS, ceci d'autant 
plus facilement que le 
beau-frère de CHAU- 
TEMPS est aussi l'avocat 
de STAVISKY. Faisant 
suite à ce scandale politi- 
que, des mouvements de 
rue s’amplifient, entraî- 
nant quelques mois plus 
tard, la chute du gouver- 
nement. On considère que 
cette affaire est à l'origine 
du front populaire. . 

Voilà donc une af- 
faire complexe quipourrait 
être classée dans  plu- 
sieurs rubriques : scan- 
dale financier, scandale politique, ou 
les évènements de février 1934, mais 
encore : le nationalisme ancien- 
combattant ou la préhistoire du front 
populaire. Et bien CHRONOS l'a clas- 
sée dans toutes ces rubriques (et 
quelques centres). «CHRONOS est 
capable de répondre à la question qui 
lui est posée, quel que soit le niveau de 
connaissance de celui qui ques- 
tionne». 


Ainsi, ne connaissant rien de cette 
affaire (je n'avais pas encore lu TEO), 
je tape : Crédit Municipal de Bayonne, 
car je crois me souvenir qu'il y a eu un 
scandale là-bas, entre 1848 et 1944 
(c'est vague l). 

Aussitôt, l'ordinateur affiche une 
fenêtre dans laquelle il donne des 
renseignements sur les lieux ou les 
personnages dont il est question, ceci 
afin d'éviter les problèmes dus aux 
homonymes ou autres. Puisqu'il s’agit 
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bien de Bayonne, dans les Pyrénées 
Atlantiques, il suffit d'appuyer sur la 
touche F7 pour avoir les informations 
concernées par la question. Dans ce 
cas, une seule information : l'arres- 
tation du directeur du Crédit Munici- 
pal, le 24 décembre 1933, pour avoir 
émis des faux bons de caisse. 
L'information est précise mais 
brute. Pour en savoir plus, on ouvre 
unetroisième fenêtre de dialogue en 
appuyant sur l'une des flèches et 
l'ordinateur indique, par un message, 
qu'il «étend vers les questions indui- 


| boire question : Thiers 





tes». C'est comme cela que j'ap- 
prends qu'il s’agit, en fait, de l'affaire 
STAVISKY, d'où la supériorité évidente 
du système expert sur les logiciels clas- 
siques : il déduit à partir de muitiples 
portes d'entrée. 


Comme je suis toujours ignare, 
je ne connais pas ce Monsieur STA- 
VISKY. Très simple, jenfonce la 
touche F10 et je tape son nom ; aus- 
sitôt, sa biographie résumée apparaît 
en haut de l'écran. J'apprends encore 
du neuf : c'est un célèbre escroc à 
l'origine d'un scandale financier. Il me 
faut donc en savoir plus. En me 
déplaçant à l'aide des flèches, je fais 
se dérouler sous mes yeux (ébahis), 
toute l'affaire STAVISKY parle menu et 
donc chronologiquement. 


Devenant de moins en moins 
ignare, je décide de pousser plus loin 
la réflexion et d'étudier les répercus- 
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sions de cette affaire. Pour ce faire, je 
reviens dans la fenêtre de droite et dé- 
couvre, en la parcourant, ce que lordi- 
nateur considère comme étant les 
contextes adjacents de l'affaire STA- 
VISKY : les grands scandales politi- 
ques - 1934, l'émeute dans la rue -les 
lignes et l’extrême-droite - la préhis- 
toire du front populaire … 


En tapant : 1934 l'émeute dans 
la rue, j'obtiens le déroulement chro- 
nologique des émeutes de février 
1934. Par contre, sije m'intéresse aux 
grands scandales politi- 
ques, CHRONOS va me 
proposer une liste des 
scandales politiques de 
la Illème République. Ain- 
si, je peux découvrir 
(décidément, je suis 
d'une incukure …) qu'il 
existe un «scandale des 
décorations» ; et en 
tapant ce nom, j'obtiens 
les informations qui con- 
cernent ce fait : le pas- 
sage de la Revanche à 
Anti-parlementaire sous 
la cinquième  législa- 
ture … Grâce aux flè- 
ches, il m'indique dans sa fenêtre de 
droite les questions induites : 
scandale de Panama, Boulan- 
gisme … 


On est bien loin de la question 
initiale : «Crédit Municipal de 
Bayonne» et ce moment passé avec 
l'ordinateur lui a permis de «mieux me 
connaître». Je m'explique : un sys- 
tème expert est l'une des applica- 
tions de l'intelligence artificielle et 
avec CHRONOS, votre ordinateur 
devient vraiment plus intelligent. Lors- 
que vous le questionnez, le contredi- 
sez, le sollicitez, il intègre petit à petit 
des éléments de votre trame de rai- 
sonnement ; en d’autres termes, ilre- 
marque si vous vous intéressez plus à 
telle période ou à tel type d'évènement 
et ainsi, il va proposer des réponses 
et des sujets qui tiennent compte de 
ces remarques. lln'élimine pas pour 
autant les autres réponses possibles, 


mais il ne les donne pas en priorité et 
ceci tant que vous ne lui donnez pas 
expressément l’ordre de changer de 
sujet et donc de mode de raisonne- 
ment. 

On comprend alors l'intérêt que 
peut représenter ce logiciel, ou en tout 
cas le moteur d'inférence et les règles 
(ce qui propose des choix liés au rai- 
sonnement de l'interrogateur) pour 
gérer une bibliothèque ou une impor- 
tante documentation de façon intel- 
ligente. On peut tout à fait «améliorer» 
la convivialité du système en l'adap- 
tant à ses propres besoins : on peut 
indexer tous les ouvrages de la biblio- 
thèque d'une école (par exemple) ou 
de sa propre bibliothèque et ainsi, 
lorsque l'on s'intéresse à un fait histo- 
rique, CHRONOS vous indique les 
renseignements qu'il possède déjà sur 
cette question et il vous renvoie sur tel 
ou tel ouvrage de la bibliothèque. Il 
peut aussi s'agir d'autres textes de 
référence, ou de graphiques … 


CHRONOS peut devenir une 
sorte de «super index» pour piloter 
votre ordinateur, notamment si vous 
possédez un disque dur. Ainsi, si vous 
avez déjà entré, sur un tableur tel que 
Muitiplan (ou autre) l'évolution de la 
production de charbon entre les diffé- 
rents bassins français, vous pouvez 
vous en servir directement dans 
CHRONOS. 

Quand on interrogera CHRO- 
NOS sur la production de charbon, il 
indiqueræ qu'il y a un tableau disponi- 
ble. Si vous le sélectionnez, CHRO- 
NOS lancera Multiplan, ce qui affiche- 
ra le tableau, et vous pourrez revenir 
dans CHRONOS par une simple 
pression de touche. Vous pouvez 
aussi faire apparaître ce tableau 
lorsque l'on questionne CHRONOS sur 
l'année 1863, puisque cette année-là, 
le nord est devenu le premier bassin 
producteur de charbon de FRANCE. 


On peut aussi adresser, si l'on 
possède un modem, une banque de 
données et ainsi, si l'on sélectionne 
cette possibilité, CHRONOS vous 
connecte directement sur cette base 


de données et sélectionne l'ouvrage ou 
le texte que vous aurez initialement 
défini. 

A l'inverse, CHRONOS peut très 
bien envoyer des informations vers 
d'autres logiciels, notamment vers un 
traitement de texte, ce qui vous per- 
mettra d’avoir, par exemple, la déclara- 
tion des droits de l’horime (contenue 
dans CHRONOS) et après une transi- 
tion de votre crû, de la comparer au 
serment du jeu de paume (lui aussi 
contenu dans CHRONOS). Dans ce 
cas, le transfert se fait sous la forme 
d'unfichierséquentiel ASCII, sans ca- 
ractères de formatage, de façon à être 
utilisable par le plus grand nombre de 
logiciels possible. 


Les échanges de données sont 
l’un des atouts de ce logiciel. 

De nombreuses écoleset des his- 
toriens, ont travaillé à l'élaboration de 
bases de données sur des centaines 
de sujets, avec des logiciels tels que 
dBASE Ill... il sera donc possible à 
ces personnes de s'échanger des 
disquettes de données, directement 
utilisables par CHRONOS, la pañi- 
cularité de ce logiciel étant que les 
différents utilisateurs de ces mêmes 
données ne les indexeront pas forcé- 
ment de la même façon et doncelles 
ne répondront pas forcément aux 
mêmes questions. 


G. BOURGEOIS : «la prochaine 
étape, qui est d’ailleurs bien avancée, 
consiste en un CHRONOS amélioré 
qui, une fois connecté sur une base de 
données, indexe lui-même à partir de 
sa grille de lecture les ouvrages, 
textes, tableaux, contenus dans la 
base de données, de façon à vous les 
proposer lors de vos interrogations. 
Libre à vous de modifier, ensuite, leur 
chemin d'accès.» 


Toute la série des logiciels 
CHRONOS tourne actuellement sur 
ordinateur PC et compatibles, mais ces 
programmes sont facilementtransféra- 
bles sur Atari et Mac Intosh dans un 
proche avenir. La version Nano-ré- 
seau ? 
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JM. FORESTIER : «Une version 


Nano-réseau est facilement réalisable, 
mais sa réalisation dépend, bien sûr, de 
la durée de vie de ces réseaux dans les 
écoles. Et dans ce domaine, les der- 
nières décisions du gouvernement 
sont encore trop vagues pour parmet- 
tre de prendre une décision». 





«Mais nous n'en resterons pas là» 
ajoute G. BOURGEOIS ; «la dis- 
quette n'est pas le support idéal pour 
CHRONOS. Il y a, à moyen terme, le 
compact disc (CD ROM) qui permet, 
outre les textes, d'afficher aussi bien 
des portraits de personnages que la 
«une» des journaux de l'époque». 

Rappelons qu'un compact disc 
contient l'équivalent de 1400 disquet- 
tes standard. 

Etenfin, comment ne pas évoquer 
la question du minitel. 

Pour J.M. FORESTIER «rien ne 
s'y oppose». Le portage d'untelservice 
sur minitel est assez facile à réaliser 
et il y aurait même un avantage : 
l'utilisateur pourrait laisser dans sa 
«boîte-aux-lettres», ses règles d'ac- 
cès à l'information et les retrouver lors 
d'une prochaine connexion au service. 

Quel que soit le support choisi, 
CHRONOS vient de faire passer les 
didacticiels dans laclasse au-dessus et 
pour une fois, cela intéresse tout le 
monde, de l'étudiant au chercheur, en 
passant par l'enseignant. 

L'achat de cette série vous 
coûtera 1000 francs pour l'une des 
bases généralistes et entre 400 et 800 
francs pour les bases thématiques. 
Seulement, pour ce prix, vous achetez 
aussi l'expert qui vous permettra d'ac- 
céder à ce savoir et d'évoluer intelli- 
gemment dans l'histoire, quel que soit 
votre niveau de connaissance. H 

Pierre E. GRANGE 
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plus spécifique, utilisez les capacités 
de l'éditeur graphique du programme : 
modifier un dessin existant, gommer 
certaines parties, découper et en 
recoller d'autres Tout est permis. 
Vous pourrez même créer entièrement 
un nouveau dessin. Choisissez un 
type de tracé (ligne, carré, rectangle, 
cercie, ellipse) et redéfinissez si vous 
le souhaïtez les textures du pinceau 
(fin, moyen, gros). A partir de là, la 
qualité du dessin ne dépend que de 
votre imagination et de votre talent. 
Mais comme tout le monde ne peut 
être artiste-paintre, LE JOURNALISTE 
permet d'effacer les coups de souris 
ou de stylo optique malheureux. La 
conception d'un journal étant un travail 
de précision, une fonction LOUPE vous 
donnera un agrandissement de la zone 
que vous travaillez. Si vraiment vous 
n'êtes pas dans un jour créatif, vous 
pourrez, comme dans toutes les 
différentes parties du JOURNALISTE, 
sauvegarder le travail déjà accompli 
pour effectuer ies retouches posté- 
rieurement. De même, toute planche 
créée que vous avez sauvegardée est 
bien sûr réutilisable. 

Un bon dessin vaut mieux qu’un 
long discours, mais il est quelquefois 
encore plus efficace d'y inclure un 
texte. Là aussi, pas de problème. Avec 
LE JOURNALISTE, insérer quelques 
lignes dans vos illustrations est un jeu 
d'enfant. Les illustrations elles-mêmes 
sont faciles à intégrer dans les pages 
de votre journal. C'est là une des fonc- 
tions de l'atelier «Montages». 

Mais avant de procéder à la mise 
en page, il vous faut choisir les types de 
caractères que vous utiliserez. Des 
fontes appropriées illumineront vos 
titres et égaieront vos textes. Elles 
donnent aussi un ton différent au jour- 
nal. Des titres en caractères gothiques 
n'ont pas le même impact que s'il sont 
écrits en caractères usuels. 

LE JOURNALISTE propose 31 
fontes différentes, des plus farfelues 
comme les fontes graffiti, au plus 
ciassiques comme les fontes anglai- 
ses. Un menu indique les noms des 
fontes, leurtype (gras, italique, normal) 
qui est modifiable, ainsi que la mé- 
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moire occupée par chaque fonte (une 
donnée à ne pas négliger). 

Une fois la typographie choisie, 
des fenêtres s'ouvrent dans l'écran. 
Vous pouvez ainsi voir le caractère sé- 
lectionné en taille réelle ou grossie et 
les tester sur quelques lignes. 

Si l'éventail de fonte ne vous 
satisfait pas, vous pouvez, tout comme 
dans l'atelier dessins, créer de nou- 
veaux caractères. Le principe est 
assez sirnilaire à la création de nou- 
veaux graphismes. Plusieurs modes 
de tracés sont à votre disposition : le 
tracé direct au crayon optique, ou le 





tracé point par point avec la souris. 
Vous avez en plus la possibilité de 
procéder par symétrie verticale : il 
vous suffit de définir la moitié d'un ca- 
ractère, le logiciel composera l'autre 
moitié. Une fonction simple qui peut 
faire gagner beaucoup de temps. 

Mais LE JOURNALISTE ne fait 
malheureusement pas tout le travail. 
Pour créer une fonte, il faut définir tous 
les caractères que vous souhaitez utili- 
ser dans cette nouvelle fonte. 

Depuis le temps que vous êtes 
assis devant votre écran, ses couleurs 
commencent à vous lasser... Par goût 
ou pour éviter de fatiguer vos petits 
yeux fragiles, vous avez l'opportunité, 
grâce à une heureuse fonction prévue 
à cet effet, de modifier les couleurs du 
tour, du cadre, du fond et même du 
curseur. Ou alors sauvegardez le fruit 
de votre labeur sur une disquette 
séparée et revenez plus tard, vous êtes 
presque arrivé au bout de vos peines. 

En effet, une fois les articles 
écrits, la typographie et les illustra- 
tions sélectionnées, il ne vous reste 
plus qu'une étape décisive à franchir : 
la mise en page. Toutes les fonctions 
dont vous avez rêvé pour réussir un 
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METRE NE CRETE 
CE 


Etes 1 es 
montage, vous les trouverez dans LE 
JOURNALISTE. Jetez votre colle et 
vos ciseaux, ils ne vous seront plus 
d'aucune utilité! Tout le travail fasti- 
dieux du secrétaire de rédaction vous 
est évité. Vous n'avez qu'à décider de 
la longueur et de la largeur d'un 
article, l'écran affichera le nombre de 
lignes dont cet article sera composé. 

Vous visionnez ensuite à l'écran 
la page que vous montez et, agencez 
pas à pas les textes et dessins. 

Si vous n'êtes pas satisfait de la 
mise en page, déplacez, supprimez 
des parties.….., jusqu'à ce que vous 
soyez comblés. 

Vous allezenfin avoir votre joumal 
imprimé (n'oubliez pas de sauvegarder 
le montage). Depuis le temps que 
l'imprimante attendait ce moment | 
Ajustez le papier, pointez son format. 
Votre publication est achevée. Mais le 
temps que l'imprimante ait fini de tirer 
les 1 000 exemplaires que vous sou- 
haïtez, vous pouvez déjà penser au 
contenu de votre prochain journal. 

Sur ce point, LE JOURNALISTE 
de CEDIC/NATHAN ne pourra pas 
vous aider. Pour faire un bon journal, 
il faut avant tout avoir de bons articles. 
Par contre, LE JOURNALISTE vous 
sera un précieux outil de travail pour 
concevoir etfabriquer votre journal. Ce 
logiciel est fait pour tous ceux qui 
veulent bénéficier des fonctions d'un 
traitement de textes et d'un éditeur 
graphique réunis et compatibles. 

Alors clubs, écoles, particuliers 
sans gros moyens, si vous voulez 
communiquer, faites chauffer vos 
imprimantes avec le logiciel qu'il 
faut acheter absolument : LE 
JOURNALISTE ! 


Stéphane Etienne 


LOGICIELS 








Un logiciel qui va falre chauffer 
les Imprimantes. Le premier logiclel 
de micro édition sur TOB, TO8D ou 
TO9+ est enfin paru cet été. Nous 
l'avlons annoncé dans le numéro 
précédent, nous vous le falsons 
maintenant découvrir. Nul doute 
que LE JOURNALISTE va réjouir 
tous ceux qui végétalent avec leur 
machine à écrire et leur photoco- 
pleuse pour éditer un Journal. 





pas, ce logiciel ne va pas faire de vous 
un journaliste. Mais si vous souhaitez 
imprimer une publication, LE JOUR- 
NALISTE est fait pour vous. il suffit 
que vous soyez équipé d'une impri- 
mante, d'une sourñs ou d’un crayon 
optique, etbien évidemment du micro- 
ordinateur, pour que LE JOURNA- 
LISTE vous fasse découvrir la PAO. 
Mais ne brûlons pas les étapes. 
Avant de tenir entre les mains un 
exemplaire de votre journal, il vous 
faudra passer de nombreuses heures 
d'apprentissage pour maîtriser com- 
plètement LE JOURNALISTE. Le 
manuel d'utilisation fait plus de 150 
pages ! Ne soyez pas découragé 
pourautant. Le mode d'emploiclairet 
bien fait, vous guidera pas à pas à 
travers les arcanes de la micro-édition. 
Le système du JOURNALISTE 
se divise en cinq parties, appelées 


«Ateliers» (nostalgie de l'époque où la 
création d'une publication était l'affaire 
d'ouvriers-artisans ?). 

Pour chaque atelier, dix comman- 
des différentes sont accessibles dans 
un bandeau où vous pouvez les sélec- 
tionner avec la souris, le crayon opti- 
que, ou le clavier. Si vous venez 
d'acheter ce logiciel, vous êtes sans 
doute impatient de découvrir les 
merveilles que vous êtes susceptible 
de réaliser. LE JOURNALISTE répond 
à ce désir légitime : un exemple de 
joumalclés en main vous donnera une 
idée de cequelelogicielest capable de 
faire, il suffit de quelques minutes pour 
l'impression sur papier. 

Lorsque vous aurez défini le 
contenu exact de votre journal, poin- 
tez l'option «Articles+, premier atelier 
du logiciel. Grâce à cet atelier, votre 
TO redécouvrira les joies du traite- 
ment de textes, dont les principales 
fonctions sont proposées par LE 
JOURNALISTE. En plus de la saisie 
des articles, vous avez déjà accès à 
quelques fonctions dela miseen page. 
Vous pouvez sélectionner la largeur 
des colonnes par rapport à la table de 
page ainsi que la forme des paragra- 
phes (largeur de la marge, centrage de 
la première ligne...) L’espacement 
proportionnel non plus n'est pas 
oublié. Et selon le concept WYSIWYG 
cher à la PAO, le colonnage que vous 
aurez sur votre page imprimée sera le 
même qu'à l'écran. Cela évite ainsi 
toute mauvaise surprise. Lorsque vous 
avez fini de saisir vos textes ou que 
vous voulez interrompre votre travail, 
vous pouvez sauvegarder les don- 
nées sur disquette. Rien n'est perdu. 
Vous aurez ainsi la possibilité de pour- 
suivre la rédaction et la conception 
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lorsque vous le souhaiterez, il suffira de 
charger votre disquette annexe. 

Une fois la rédaction achevée, 
vous aurez sans doute envie de donner 
plus d'impact à vos articles en les 
illustrant. Le contenu d'un journal est 
certainement primordial, mais laforme 
est aussi très importante. Fort de cette 
constatation, Vous  chargez la 
deuxième disquette du programme LE 
JOURNALISTE, celle oüsontstockées 
les données (la première disquette du 
programme contenant le système). 
Vous pénétrez alors dans le petit 
monde merveilleux de l'édition graphi- 
que. Dans ce domaine, LE JOURNA- 
LISTE fait bren les choses, une fois de 
plus. 81 planches de dessins thémati- 
ques sont disponibles, et chaque plan- 
che regroupe en moyenne 5 dessins. 
Leur qualité graphique est excellente 
pour Thomson (lorsque l’on sait bien 
l'utiliser, un Thomson peut faire des 
graphismes excellents). 








C_Norngl | ] | 
Mes pere Lane | 
D'ailleurs, on vous fera bientôt 

une démonstration dans TEO. Les 
planches proposées par LE JOURNA- 
LISTE sont très diverses : des mappe- 
mondes à la BD, en passant par les 
animaux ou la musique, vous aurez 
déjà un large éventail d'illustrations 
pour appuyer vos textes. Mais si vous 
n'ytrouvez pas votre bonheur et que 
vous avez besoin d'une illustration 
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LE BASIC FONCTIONNEL 


À NOUS LES 





AILE 


Historiquement, les méthodes modernes de programmation sont nées du procès 
fait dans les années 60, au GOTO. Mais ce serait caricaturer ces méthodes que de les 
ramener à la disparition du GOTO condamné. 


L'un des aspects les plus importants de la programma- 
tion fonctionnelle est le sens du discours : Un programme 
est la traduction fonctionnelle de l'expression d’un besoin 
d'automatisation. Il doit être le reflet fidèle du discours qui 
décrit le besoin. 

Ce point sera développé plus tard. 

Avant d'établir les moyens d'écrire un programme, il 
faut se pencher sur le langage de son écriture (un peu de 
grammaire avant l'étude de concepts). 

Dans les années 70, naît la Programmation 
Structurée ; elle met en évidence deux structures fonda- 
mentales de la programmation : la répétition et l'alterna- 
tive. Mais il y eut deux approches : 

- la méthode Warnier, trouvant les structures dans 
l'information à traiter (structure des fichiers …) 

- la méthode Tallineau-Bertini, trouvant les structures 
dans le langage même de la programmation. 

Réconcilions les deux méthodes en rappelant que «le 
langage est le structurateur de l'esprit». 

La perception du monde se fait à l’aide d'abstractions 
intelligentes de l'esprit : les structures. Pour décrire le 
monde selon la perception que l'on a, c'est-à-dire organisé 
selon nos structures, il faut des mots du langage, ou bien 
on peut dire le contraire, on perçoit le monde organisé selon 
nos structures parce qu'on possède un langage pour le 
décrire -c'est la poule qui naît de l'oeuf ou l'oeuf de la poule- 
Tintin à Guizeh en EGYPTE s'écriera : «oh! les trois belles 
pyramides», tandis que Milou aura trouvé des gros tas de 
pierres pour lever la patte. Peut-on imaginer un langage qui 
ne correspondrait pas à la structure du monde qu'il doit 
décrire. 

Il en est de même pour l'informatique : son monde, 
c'est l'information à traiter et son langage, les instructions 
de traitement. Tout langage de programmation contient les 
structures de l'information ätraiter, que l’on retrouve dansles 
traitements correspondants. 
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Pour écrire un programme, il faut trouver les structu- 
res. Elles seront décrites au moyen des instructions 
spéciales du langage de programmation. 

Quelles sont ces deux structures ? 

Le principe premier de l'informatique est le découpage 
de l'information en toutes petites unités traitées par de 
toutes petites opérations élémentaires. L'ordinateur, à 
l'aide d'un découpage du temps, ne traite qu’une petite 
unité à l’aide d’une petite opération à la fois. Mais il répète 
cela très rapidement et finalement, il traite de gros 
volumes : c'est la REPETITION. 

Ce n'est pas parce qu'un traitement est rapide qu'on 
le recommence. Avec un ordinateur vingt fois plus rapide, 
on pourrait recalculer vingt fois le salaire dans le même 
temps ; cela n’est pas utile. Et ce n'est pas pour le plaisir 
qu'on le calcule chaque mois ! Un salarié peut être absent 
ou non, faire des heures supplémentaires, être promu 
Cadre, etc C'est parce que sa situation diffère qu'on 
recalcule son salaire chaque mois, mais en testant à 
chaque fois, de nouveau, toutes les options possibles : 
absence ou non, heures supplémentaires ou non, «Cadre» 
ou non, … 

Lesecondprincipe de l'informatique est doncle CHOIX. 

Finalement, l'ordinateur gère l'irrationnalité de 
homme ! (et pour la météo ? Il gère l'irrationnalité de 
Dieu). 

Ces deux structures de l'informatique, la répétition et 
le choix, sont précisément les deux structures fondamen- 
tales de la logique élémentaire, mises en évidence par 
Aristote avec ses aphorismes (Socrate est un homme, tous 
les hommes sont mortels ….): C'est les «quel que soit …» 
et «il existe …» des maths modernes. 

Mais la Bible, avec le péché originel, nous enseigne 
la logique de l'informatique : il y eut d’abord le choix «cro- 
quera la pomme, ou croquera pas», puis larépétition lorsque 
le péché s'étendit à tous les hommes … 
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Les deux Instructions de structure du langage : 
1) LE CHOIX 


- le choix simple: {si condition alors falre traitement 
en Basic :{IF (condition) THEN GOSUB traitement 











- l'alternative :  |si condition alors faire traitement n°1 
sinon faire traitement n°2 
en Basic :|IF (condition) THEN GOSUB 


traitement 1 
ELSE GOSUB traitement 2 


Remarque : l'alternative, si importante pour la pro- 
grammation structurée, est une forme théorique moins 
répandue que les structuralistes ne semblent le croire : un 
code indique C pour un Crédit, et D pour un Débit L'aiterna- 
tive s'écrit alors : 

- si (code=»C») alors faire CREDIT sinon faire DEBIT 
mais si le code est «X>», cela ira au débit du ciient ? 

En fait, il y à 256 combinaisons pour un code de 1 
caractère. Il est préférable d'utiliser le choix multiple. 


- le choix multiple : aucun langage ne contient d'instruction 
de choix multiple qui soit satisfaisante. Il existe en Pascal le: 





au cas ou 
variable=valeur1 faire traitement n°1 
variable=valeur? faire traitement n°2 


variable-valeur3 faire traitement n°1 
Variable=valeur4 faire traitement n°3 





fin au cas ou 


Cette instruction gère les valeurs d'une variable unique 
et non la structuration des traitements concernant les 
résultats, comme cela doit être le cas d'un vrai choix 
multiple. Pour assurer la lisibilité, il faut éviter l’utiiisation de 
IF qui s'imbriquent les uns dans les autres : 








si condi alors si cond? alors faire traitement n°1 
sinon faire traitement n°2 
alors faire traitement n°3 
sinon faire traitement n°4 
Il faut construire le choix muitipie avec une série de 
choix simpies indépendants : 
faire traitement-début 


si condi alors faire traitement n°1 
_si cond? alors faire traitement n°2 






sinon si cond3 





_si cond3 alors faire traitement n°3 
si cond4 alors faire traitement n°4 
faire traitement-fin 





Prenons comme exemple le programme VIDEOTEX 
paru dans TEO n°15 : 
GOSUB 200 ‘début du choix 
IF TEXTE THEN GOSUB 300 ‘traitement du texte 
IF GRAPH THEN GOSUB 400'traitement du semi-graphique 
IF FLECH THEN GOSUB 500 ‘traitement appul sur flèche 


GOSUB 2800 fin du choix 


TEON" 19 - SEPTEMBRE/OCTOBRE 1988 


LE BASIC FONCTIONNEL 


Dans le choix multiple, il y à ce que l’on fait avant, 
comme de reconnaître quelle action est commandée : 
TEXTE, GRAPH, FLECH, etc... puis l'exécution d’un traite- 
ment unique exclusif des autres (il est beaucoup plus sain 
de ne pas mélanger les actions : on choisit une action et on 
la fait). Puis enfin, il y a ce que l'on fait après, quel que 
soit le traitement exécuté (comme de saisir la commande 
suivante, s'il y a répétition). 

2) LA REPETITION 

- la répétition restreinte : (restreinte dans le sens où 


au moins un premier traitement est réalisé). Très peu de 
Basic possède cette répétition. 


répéter faire traitement jusqu’à (condition) 


En Pascal : 


REPEAT 


UNTIL (condition) 
Son utilité n’est pas très importante. 
- la répétition générale : si la condition est fausse dès 
le début, aucun traitement n'est réalisé. 


tani Que (condition) laire traltemen 


C'est la répétition la plus utile. En GWbasic, elles'écrit : 
WHILE (condition) 


WEND 
Ce While/Wend peut simuler la répétition restreinte : 

WHILE(-1) 
IF (condition) THEN WEND 

la répétition universelle ; 

faire : 

faire traitement n°1 
si (condition) alors fin faire 











faire traitement n°2 
recommencer. 





Elle est universelle car elle recouvre les deux 
répétitions précédentes: si traitement n°1 est vide, alors 
c'est une répétition générale (le test de fin est réalisé dès 
le début), et si c'est le traitement n°2 qui est vide (pas d'ins- 
tructions) alors c'est une répétition restreinte (au moins 1 
fois). À noter que si le traitement n°2 est exécuté 100 fois, 
alors le traitement n°1, lui, sera exécuté 101 fois. Vous me 
direz que cela doit représenter une situation plutôt rare. Et 
bien non, en informatique cela correspond àla constatation 
suivante : quand on exécute une action, le monde présente 
deux états : l'état avant et l'état après. Si l'on exécute 10 
actions, alors ii y a 11 états différents du monde ; il y a tou- 
jours un état de plus que d'actions.Par exemple, pour 
calculer le saïaire des employés à l’aide du fichier des 
employés (remis à jour avant), il faut lire le fichier autant de 
fois qu'il y a d'employés, plus une fois lorsqu'on arrive à la 
fin du fichier (cette lecture doit qu'iln'y a plus defiche et donc 
correspond à l'état du monde après le calcul pour tous les 
empioyés). 
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C'est le classique problème des intervalles et tant 
que les informaticiens n’auront pas pris le pouvoir, pour 
mettre les mathématiciens en prison,il en sesra toujours 
ainsi : il y a un état du monde de plus que d'actions 
effectuées sur le monde. Ceci peut donc justifier cette 
structure de répétition universelle. 

Le Basic 128/512 de THOMSON (comme le TurboBa- 
sic de Borland sur TO16 et ADA) possède cette répétition 
universelle qui recouvre les deux premières répétitions : 


-restreinte : 
-générale : 


-universelle : 


2.  —— 


Exemple dans VIDEOTEX: le programme est organi- 
sé autour de la répétition d'une commande jusqu'à “Quitter” 





Dans cette structure, il y a ce qu'il faut faire au 
début (initialisations, ouverture des fichiers), la répétition 
restreinte «faire le traitement des lignes 20 à 95 (RETURN) 
et si COMMANDE est vrai, recommencer», puis enfin ce 
qu'il faut faire après. Une répétition générale s’écrirait : 










MANDE THEN GOSUB 20 : LOOP 


La variable COMMANDE qui devient vraie ou fausse à 
la fin du traitement recommancé, doit prendre dès le 
traitement de début 100, la valeur vraie ou fausse, dans la 
forme générale. 





Prenons comme exemple un programme testant la 
lecture de la souris cliquée à gauche ou du crayon optique 
pressé comme dans un programme de menu déroulant. Le 
programme contient : 

- une répétition générale : «tant que (non appui sur ie 
clavier)» 
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- un choix simple : «si (appui sur le bouton de la souris ou 
le crayon)» 


- une répétition restreinte : «répéter … jusqu’à (relàche- 


ment souris)» 
10 CLS:Y-0:X=-80:GOSUB 200 ‘initialisation 
20 DO “répétition générale 
30 IFINKEY$>»>THEN EXIT “tant que non clavier 


40 IF PTRIG THEN GOSUB 100 “si souris faire choix de la ligne 


50 LOOP “recommencer 

60 PRINT»ligne»Y@8 “résultat 

70 END “fin programme 

100 DO “répétition restreinte 

HOÏNPEN X1, Y1 “ecture position souris ou 
crayon 

120 GOSUB 200 “inverse ancienne position 

130 Y-(Y1@8)°8 “ligne entière 

140 GOSUB 200 “inverse nouvelle position 

1501F PTRIG THEN LOOP “si boutonpressé recommencer 

160 RETURN 


200 CONSOLE. 4:BOXF(X,Y)-(X+80,Y+7):CONSOLE,,0: 
RETURN “inversion ligne 


Cette instruction DO...LOOP est tellement universelle 
qu'elle peut rendre service dans le cas de certaines struc- 
tures de choix : supposons la saisie d'un écran par un 
ensemble de rubriques, si l’une d'elles est invalidée, alors 
on arrête la saisie de l'écran. 





Ce n’est pas une répétition, mais bien un choix assez 
sophistiqué, l'ensemble ne sera exécuté qu'une seule fois, 
puisque l’ordre de sortie de la possible répétition précède 
l'ordre de recommencer. (qui lui est obligatoire pour le DO) 
EXIT:LOOP. 


L'instruction FOR .… NEXT n'est qu'une Instruction de 
comptage et de manipulation de tableau indicé. Elle ne doit 
plus être considérée comme une instruction de répétition, 
mais de récurrence, lorsqu'on connaît le nombre exact 
d'objets manipulés. 


La prochaine fois, nous étudierons la variable boo- 


léenne, si importante et pourtant méconnue, ainsi que la 
présentation des programmes en Basic Fonctionnel. 


Max HAGENBURGER 
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("LA MICRO PREND LES 
ARMES" suite) 


Les jurés ne seront autre que vos 
compagnons de jeu (sur minitel) ou 
bien l'ordinateur si vous êtes seul. 


Vous serez jugés 





D'ores et déjà le logiciel promet 
d'être de grande qualité par son gra- 
phisme, son prin- 
cipe et son origl- 
nalité. Si vous 
voulez le tester, 
et bien rendez- 
vous à Grenoble 
dès mars 1989 
au musée per- 
manent de la ré- 
volution (château 
de Vizille) Le jeu 
sera exposé en 
démonstration. 

TEO, c'est 
promis, vous 
tiendra au cou- 
rant des moin- 
dres faits et ges- 
tes de la révolu- 
tion qui se pré- 
pare. 


Que va t-il se passer ? 


La révolution, c'est certain, est 
un thème porteur. Pour preuve, les 
projets qui fleurissent ici et làà 
l'initiative de particuliers, d'organis- 
mes, du ministère de la culture. 


Il faut s'attendre à un grand 
festival, une immense parade de ma- 
nifestations et autres événements 
pour commencer ce quise passa voici 
200 ans. 


Depuis cette fameuse prise de la 
Bastille, laFrance se souvient rituelle- 
ment chaque année de son peuple qui 


la libéra, un 14 juillet symbolique, de la 
monarchle du bon rol Louls XVI. 

Témoin, donc, ce feu d'artifices 
de souvenirs qui tous les ans Illumine 
nos villes et nos campagnes. Chaque 
région, département ou communauté 
urbaine va tâcher de rappeler à sa 
façon 1789, l'an par lequel arrivèrent 
Liberté, Egalité, Fraternité. 


Alors, à quoi faut-Il s'attendre ? 
Une chose est certaine, l'anniversaire 
ne passera pas inaperçu. Les confé- 
rences, colloques ou expositions se 
comptent par milliers et cela dès à 
présent. Tous les arts prennent le 





thème à leur compte : le théâtre et 
l'opéra vont adapter la révolution à la 
scène ; les carnets de commande des 


sculpteurs sont remplis : toutes les 
villes veulent leur monument, leur 
plaque commémorative à la gloire de 
1789 ; des festivals de film, des 
concours, des animations de rue, des 
expositions : «la révolution de l'Eu- 
rope> au Grand Palais (Paris), «archi- 
tectes de la révolution» à l'école des 
beaux arts. 


Aucun grand secteur de l’activité 
humaine ne devrait rester à l'écart du 
bicentenaire, du plus cukurel jusqu’au 
plus sportif: l'ascension de l'Everest où 
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INTERVIEW 


des alpinis- 
tes français 
liront la dé- 
claration des 
droits de 
l'homme et 
du citoyen 
sur le toit du 
monde. Tout 
le monde est 
concerné 
musique, 
danse, théatre, cinéma, télévislon, 
éducation, tourisme, sport, loisir, ar- 
chitecture, livres, objets commer- 
ciaux,.… 





Si Il y ade 
nos jours tant 
d’engouement 
par ce qui se 
passe il y à 2 
siècles et qui, 
pourtant, est 
proche de nous, 
c'est peut-être 
parce que dans 
notre société, 
dont toutes les 
structures sont 
en crise, la révo- 
lution est un 
exemple : ceiui 
de la volonté et 
de la capacité 
collective d'un 
peuple à pren- 
dre son destin 
en main contre l'autorité. 


Les idéaux de la révolution fran- 
çaise sont porteurs et d'actualité : 
liberté de penser, d'agir, égalité des 
droits, fraternité contre le racisme. 


On comprend maintenant mieux 
l'importance de l'événement qui est 
tout simplement à la base de notre 
société. 


Rendez-vous est pris pour 1989, 
l’année de tous les souvenirs. M 


Daniel GRADEL 


59 


LOGICIELS 


UOI 

DE NEUF 
CHEZ LES 
EDITEURS 


Finies les courses 
de voitures sur des 
routes  rectilignes. 
Finies les formules 1 
représentées par 
d’affreux rectangles. 
Les courses auto- 
mobiles qui nous 
comblaient peut- 
être il y a quelques 
années sont aujour- 
d’hui reléguées au 
rang des curiosités 
historiques. 


Mais Loriciels remet le concept 
au goût du jour avec Space Racer. Ça 
a presque le nom d'Enduro Racer, ça 
ressemble à Enduro Racer, mais ce 
n’est pas Enduro Racer. (Cf TEO n° 
18). On ne s'en plaindra pas! 


Avec Space Racer, vous êtes 
projeté en 2132, dans un monde 
post-apocalyptique que Mad Max 
n'aurait pas renié. Et dans ce monde 
dévasté, le seul plaisir des (trop) 
nombreux survivants est de se lancer 
dans une sanguinaire course de scoo- 
ters de l’espace. 

Vous êtes l’un de ces motards 
fous, et vous voilà encadré par 2 con- 
currents sur la ligne de départ. 
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Space RACER 





A l'horizon, se dressent de 
hautes montagnes vers lesquelles se 
dirige la route sinueuse où vous allez 
risquer votre vie. Les graphismes sont 
attrayants mais le paysage devient vite 
lassant. Vous avez toutefois ie choix 
entre 3 décors différents selon le ni- 
veau de difiicuité désiré. Ce sont l'as- 
pect et le nombre de poteaux balisant 
la piste qui changent. (Dans la phase 
la plus difficile, d'affreux crânes 
blanchis se profiient à l'horizon, histoire 
de se mettre dans l’ambiance). 


Tout ceci ne se fait pas au 
détriment de l'ambiance sonore. Le 
premier coup d'accélérateur nous en 
met plein les oreilles : des vrombisse- 
ments, des bruits de moteurs comme 
on aimerait en entendre pius souvent 
sur Thomson. L'intensité des rugisse- 
ments de votre scooter de l'espace 
s'accroît avec Sa vitesse. De plus, les 
bruitages vous accompagnent tout au 
long de la partie. D'ailleurs, une fois 
que vous aurez apprécié le bruit du 
moteur, n'hésitez pas à baisser le troi- 
sième bouton à gauche de votre 
moniteur...le volume. Enfin le jeu 
commence par Un morceau de 
musique assez surprenant digitaiisée 
sur PC. Un effort sur les sons qui 
mérite d’être souligné. 


Votre véhicule n'en est pas pour 
autant un bruyant sèche-cheveux |! I] 
se déplace en 3 DIMENSIONS 1! Vous 
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n'êtes pas cloué au sol, alors utilisez 
les déplacements verticaux pour éviter 
le choc avec vos concurrents ou avec 
les pylônes. Pourtant tout n’est pas si 
simple dans la 3ème Dimension : si 
vous êtes trop haut outrop bas, votre 
vitesse et votre énergie diminuent... 


Or même en 2132, la consom- 
mation d'énergie reste un problème. La 
panne sèche arrive toujours trop tôt. 
Comme il n'existe plus de station ser- 
vice, c'est une grosse boule bleue qui 
s'avancera droit vers vous. Surtout ne 
l'évitez pas. Rentrez en collision avec 
eile et vos batteries seront comme 
neuves. 


Mais Space Racer n'est pas 
qu'une simple course avec ses problè- 
mes de carburant. C'est avanttout une 
impitoyable partie de stock car où seul 
le meilleur atteint la ligne d'arrivée vi- 
vant. Allez-y franchement, malmenez 
votre joystick. Poussez vos concur- 
rents dans le décors (les scooters de 
l'espace ne subissent aucun 


dommage lorsqu'ils s'entrechoquent). 
Cependant, les pylônes les réduiront 
en tas de cendres. Si vous ne voulez 
pas vous salir les mains, désintégrez- 
plus 


les avec vos missiles, c’est 





propre. Restez toutefois vigilants et 
gardez votre sangfroidcarsi vousvous 
déportez trop sur les côtés de la piste, 
un joli poteau mettra fin à votre promet- 
teuse carrière de pilote et vous tranfor- 
mera en décalcomanie |! 


Si vous trouvez que les routes 
de France sont trop tranquilles, rejoi- 
gnez-nous sur les circuits de Space 
Racer | 5 

Stéphane ETIENNE 


DIDACTICIELS 


QUESTION 


DE 


METHODE 


Les querelles concernant l'ap- 
prentissage de la lecture sont dignes, 
pariois de celle des Anciens et Moder- 
nes. Elles donnent lieu malheureuse- 
ment à de brusques changements de 
méthodes, susceptibles de perturber 
nos jeunes écoliers. 





Quelle est la bonne orthographe ? 


LE PETIT LECTEUR a lui le 
mérite de proposer une méthode d’ap- 
prentissage cohérente et progressive, 
digne d'accompagner l'enfant durant 
les deux premières années où il «en- 
tre» en lecture. 

La démarche adoptée par l'au- 
teur du logiciel repose sur le principe 
des «graphies mobiles». Se cachent, 
sous ce joliterme, des exercices qui 
visent à développer la mémoire visuelle 
et le raisonnement. 

Le mariage des mots et des 
images, ce didacticiel propose une 
dizaine de thèmes : jouer, se vêtir, se 


nourrir, etc. Chaque thème est repré- 
senté à son tour par Une dizaine de 
mots, noms communs, verbes, adver- 
bes ou adjectifs, illustrés par des ima- 
ges. 

Le premier execice consiste à 
associer à une Image le mot qui lui 
correspond. Le second demande la 
même chose dans l’autre sens. Alnsi, 
dans un premier temps, l'enfant 
mémorise le mot et l'image. Cette 
méthode, conforme aux programmes 
de maternelle, est rendue agréable du 
fait d'image amusantes et colorées. 


Après cette étape de repérage, 
l'enfant va devoiràprésentreconstituer 
le mot. Une Image s'affiche, ainsi qu'un 
moule vide représentant la forme du 
mot à retrouver. Ce moule donne 
également ie nombre de syllabes. 
L'utilisateur va devoir les deviner une 
par une. Pour ce faire, il va aller cher- 
cher dans l'aiphabet phonétique les 
sons qui lui paraissent convenir. Si la 
réponse est bonne, il pourra ensuite 
choisir la bonne graphie. En cas d'hési- 
tation, le logiciel luifournira la couleur 
de la syilabe qu'il recherche. 

Cette phase analytique est une 
des étapes essentielles du logiciel : 
elleoscilleentre l'écriture etialecture et 
permet de faire le lien entre «ce que 
j'entends et ce que je vois». 
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Ia 


(JE TTS) 


ENHLI STE TS 
Æ 


Remettons un peu d'ordre 





ACTIVITES SEQUENTIELLES 


Rien de grave | Iis'agit à présent 
de reconnaître à partir des mots déjà 
identifiés de petites phrases en 
respectant l'ordre des Images qui 
s'affichent en haut de l'écran. Cet 
exercice permet de mesurer les acquis 
de l'enfant qui peut passer ainsi au 
stade de la phrase. 

Les exercices nombreux et variés 
font du PETIT LECTEUR un outil per- 
formant et un compagnon agréable 
lors de l'apprentissage de la lecture. Le 
travail sur la graphie et le son, 
sérieusement présenté, vient parfaire 
intelligemment la première étape de 
mémorisation visuelle. M 


LE PETIT LECTEUR édité par 
CARRAZ EDITIONS. Version THOM- 
SON, PC et compatibles : 290 F. 
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DIDACTICIELS 


en bre 





LE SOLEIL ET SES PLANETES 


Si quelques notions vous parais- 
sent encore obscures, éclairez-les (1) 
en consultant ce logiciel édité par 
Cédic-Nathan. 

Ce  didactitiel, présenté sous 
forme de jeu d'aventure, vous fait voya- 
ger à travers le système solaire : la 
meilleure méthode pour apprendre les 
bases de l'astronomie ! 


000 
Ci 


EP SRE 
Ç VÉNUS 00002360 
1) Aide ee  — 
Fiche Comment gs1t ie gens 
on) DER ES 


4 Careur { RETROGRADE 

(RTE 

Mais pour voguer de planète en 
planète, il faut approvisionner le vais- 
seauen carburant. Sur chaque astre, 
vos connaissances en astronomie 
sont testées. Une réponse exacte 
augmente votre score ; Vous avez 
cinq tentatives pour répondre juste, 
mais le gain de points décroît à chaque 
essai. 


___ 0000040009 


hinoelivre g'aperqenes 
RPDUUSE BU Une 


eushe 





Alsaturne en Ve, | 


Si vous n'êtes pas astronome 
érudit, ne désespérez pas ; ce logiciel 
est là pour vous aider. Il est, en effet, 
possible de recourir à la base de 
données en consultant les 54 fiches 
proposées (ces fiches sont, en quel- 
que sorte, les cartes d'identité des 
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Malin : Bobby cherche sa maison 


astres qui composent le système so- 
laire). D'ailleurs, les auteurs du pro- 
gramme ont restreint l'utilisation de ce 
logiciel aux 10-13 ans et ce n’est pas 
une erreur.  Ils’agit bien d'une ini- 
tiation à l'astronomie et ceux en quice 
logiciel fera naître une passion, de- 
vront se reporter vers d'autres sources 
(pourquoi pas une base de données 
pilotée par système expert ….). 
Lorsque votre score est suffisam- 
ment élevé, échangez vos points con- 
tre du carburant et repartez à la 
découverte d'une autre planète … et 
des questions qui s'y rapportent. Une 
vue d'ensemble de l'astre que vous 
approchez apparaît àl'écran, puis 
une vue plus rapprochée. Malheureu- 
sement, les écrans, statiques, n'appor- 
tent pas beaucoup de rêve au logiciel. 


Mais ce didactitiel n’en est pas 
moins un outil pratique pour aborder le 
thème de l'astronomie et la dimen- 
sion ludique renforce l'intérêt pédago- 


gique. 


«LE SOLEIL ET SES PLANETES» 
édité par Cédic/Nathan-prix :225F 
et 295 F (hanoréseau) - pour TO8, 
TO8D, TO9, TO9+ et nanoréseau. 
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LES PETITS MALINS 


Des personnages que les enfants 
connaissent bien puisqu'ils existent 
sous la forme de poupées, de dessins 
animés, de journal … 





Et bien sachez qu'ils existent, au- 
jourd'hui, sous la forme de logiciels 
pour proposer aux enfants des coloria- 
ges ou des jeux éducatifs. 


LES PETITS COLORIAGES MALINS 
- édité par CARRAZ EDITIONS 149 F 
L’ANNIVERSAIRE DE BOBBY … : 
- édité par CARRAZ EDITIONS 149 F 


Tous ces logiciels feront l'objet detests 
complets dans notre prochain 
numéro. M Elisabeth DISSE 


1 


= 


NANORESE A U 


Du.désir ae Savoir 
Sa -) LE - K°] PATENTS « Le = 


SUJET/COMPLEMENT VIE ET MORT DES DINOSAURES 





Ce logiciel regroupe 4 thèmes grammati- 


caux : reconnaissance du sujet par « c'est 
qui », pronomindalisation du groupe sujet, 
pronominalisation du complément de 
phrase, déplacements et suppression du 
complément de phrase. Sujet/Complément 
offre la possibilité au professeur de créer 


ses propres fichiers, de lire 
500,00 F 


les résultats de l'élève et de 
AUX ORIGINES DE LA VIE 


revoir le travail de l'élève. 





Ce logiciel explique les origines de la vie en 
prenant comme base de réflexion la consti- 
tution de la cellule et ses modes de repro- 
duction. Co-édité avec la Fondation Diderot. 











we 2 
F0) p | BP) 
2 | : Prix 

Réf. Produit iris 
ZNR 501 | 1l était une fois 290,00 
ZNR 502 | Rédaction 290,00 
ZNR 503 | Le temps d'une histoire 320,00 
ZNR 601 | Au temps jadis 400,00 
ZNR 201 | Vie et mort des dinosaures 290,00 
ZNR 202 | Aux origines de la vie 350,00 
ZNR 301 | Didactenglish orth. gram. (collège) | 290,00 
ZNR 302 | Didact english orth. gram. (lycée) | 290,00 
ZNR 304 | Didact english orth. gram. (is niv} |! 500,00 
ZNR 507 | Sujet/Complément 500,00 
ZNR 506 | Écritures 900.00 








Ce jeu d'aventure a pour but de vous 
identifier à un jeune poléontologue étu- 
diant lasvie des dinosaures afin de passer 
une thèse expliquant leur disparition. Ce 
logiciel a obtenu le Ti d'Or du meilleur 
logiciel éducatif 1986. Co-édité avec la 


Fondation Diderot. 
290,00 F 








DIDACT ENGLISH 





proncr-enocx0r SE 


Didact English est une méthode de soutien 
et d'apprentissage de l'anglais assistée par 
ordinateur. Sa pédagogie repose sur l'ana- 
lyse de réponse, et les messages grammati- 
caux sont nombreux et variés pour répon: 


dre à tous les cas possibles. 
290,00 F 





ECRITURES 
Ecritures comprend quatre logiciels. d'aide à l'expression 
.. , ke élue Rédachon, Le temps d'une histoire, Au temps 
Eur, temps is. à 
Up) I était une fols & grôce à un conevos conforme à lo jadis 
 — Le 9 'atpahnt let 
a complétant une träme narrative donnée pr le logiciel. PE 
È Réclontode case roc Fe, déteh 
troditionnelle (le portrait, la narration, la description}, différentes formes de rédaction sont une fois 
proposées pour chaque calégorie [le portrait en puzzle, la narration en flash-back, la 2307 
en L 
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